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programmes informatiques 



EXCLUSIF : TOUTES LES NOUVEAUTES DE LAS VEGAS 

Les constructeurs ont profite du Consumer Electronics Show de Las Vegas pour annoncer leurs nouveautes 1985. La bataille sera 

I UUc C-"ll" c* J I ft 6 G ! 



ATARI 65XE et 130XE 
LES NOUVEAUX 8 BITS 

Plus performant que les Macintosh et trois fois moins cher, au 
secours ! Foncez a la page 9 

ATARI MOST et 520ST, 

LES BOMBES 16 BITS ! 

Prix defiant toute concurrence et compatibility avec les anciens 
modeles. les nouveaux 3 bits d'Aian vont faire un matheur 1 
Page <t 



— 




NOUVEAUTE 
MEME CHEZ IBM ! 

Le petit PC Junior a perrms naguere a IBM de faire un expe- 
rience nouveile et interessante : un bide mondial ! II est en 
train de renaitre de ses cendres et a des prix correspondant 
plus a ceux pratiques dans les supermarcnes que dans les 
epiceries fines qui distrtbueni babituellement les produits de 
cette vieille dame. Et un petit IBM XJ pour voire chez vous, 
ca vous mteresse ? Qui ? Allez done voir a la page 9 



UN ROBOT MSX 
PROGRAMMABLE 

4 Ko de programme dans un petit robot. I'avenir est en mar- 

che el c est vous qui le programmez ' voir page 9 



UN NOUVEAU DRIVE COMMODORE, 
le 1571 

Destine aux nouveaux Commodore 128, il tourne aussi 
avec !e C64 Voir page 8 



BIDOUILLE GRENOUILLE 

Ou comment tricher, pirater. modifier, trafiquer, magouiller, 
bidouiller et grenouiller avec les logiciels du monde entier. 
Mais dans la legalite, au moins ? Of course, mon general ! 
Lire page 10 



ADAM : 

CETTE FOIS, C'EST BIEN FINI 

Un coup je te vois, un coup je le vois pas. Tordinateur Adam a 
entame une longue valse hesitation depuis six mois. Cette 
fois. e'est officiel. sa fabrication est arretee. Voir page 8 



THOMSON 
ANNONCE LE T09 ! 

Thomson a profite de sa visile a Las Vegas pour annoncer les 
prochaines modifications du M05 et la sortie d'un nouveau 
modele de 128 Ko pour le mois de Juin: LE THOMSON TO 9. 
Lire page 8 




DEUUGNEURS 

Les falndants sont a la page 7 



FORMATION A L'ASSEMBLEUR 

Le prof et I'amateur eclalre vous attendant a la page I 



COMMODORE 128, 

DEUX NOUVEAUX MODELES 

Triple compatibility, cristaux liquides et prix raisonnable: ce 
cocktail sera t-ii explosif ? page 8 



LE MSX 

NOUVEAU EST ARRIVE 

Microsoft, continue de trahir ses compatriotes. Non content 
d'avoir cree le Microsoft Super Extended ou MSX pour les japo- 
nais, il parle en leur nom pendant une conference de presse du 
salon : "Les ordinateurs MSX qui arrivent sur le marche ameri- 
catn seront imposes par la lorce s'il It faut, les japonais sont 
prets a casser les prix pour que ce stancard devienne LE stan- 
dard mondial !" Et pour appuyer ses dires, il distribue des docu- 
mentations sur les nouveautes japonaises. II y en a un paquel. 
allez les admirer a la page 9 




ETAT D URGENCE CHEZ A^PLE : 
L' APPLE IIX DOIT SORTIR ! 

Le Macintosh est menace par les nouveaux Atari ST: meme 
caracteristiques, plus la couleur et un basic resident. Ic tout 
pour trois fois moins cher. L'Apple He est attaque par le 
Commodore 128: trois compalibilitos. extensible a 512 Ko et 
un prix inferieur de moitie. Rien ne va plus ! Lire page 8 



UN NOUVEAU FORMAT DE DISQUETTES 



QUICK DISK DRIVE est un nou- 
veau systeme rJc sauvegarde sur 
disquettes. Les disqucttes dc 
formal 2.8 inches sonl un pcu 
plus petiles que les 3.5 pouccs 
de technologic Hitachi qu'uti- 
[ise. par cxcmpic. Oric ou Ma- 
cintosh. L'engin est japonais et 
ne fonclionne pour le momenl 
qu'avec ies ordinateurs MSX. 
branctirj sur Ic port cartouche 
Son prix en Franco dcvrail tour- 
ner autour dc 1.500 francs, cc 
qui est bien, 128 Ko de capacile 
par disquctle non formaie'e. cc 
qui est moins bicn 64 ko de ca- 
pacity quand la disquettc est 
formatec. cc qui est nul. 8 se- 
conrJes pour transferer 6-1 Ko de 




CONCOURS PERMANENTS 

Votre programme, non content de vous rapporter 1.000 
francs par page publico, pent vous rapporter 20.000 
francs chaquc mois ou un voyage en Cnlifornic pour deux 
chaque trimestre. Reglemont en page interieure. 



^ 



3 PROGRAMMES POUR VOTRE ORDINATEUR : APPLE Me ET lie 
ATARI 800 XL . CANON X-07 . CASIO FX 702-P. COMMODORE 64 
ET VIC 20 . EXELVISION EXL 100 . HECTOR HR . ORIC 1 ET ATMOS . 
SINCLAIR ZX 81 ET SPECTRUM. TANDY TRS 80 . TEXAS TI-99/4A 
THOMSON T07, T0770, ET M05. 



N°67 



25 Janvier 1985 



3 



Allemagne 3,50 DM - Belgique 70 Frs - Canada 2.50 S - Luxembourg 74 Frs - Suisse 3 Frs ■ 



10F 



HANGMAN 



Un seul faux pas et couic t... Reflechissez done avant 
de repondre, cela vous evitera des resultats catastro- 
phiques (1 ou 2 joueurs). 



1 REM lU«iii«'"«»««>«ttiuitii«t 

2 REM « HANGMAN BY PICCO MICHEL * 

3 RE" * — SUR ATARI XL-- < 

.: rem tuno»»mmt «ttn»«i 

5 Din A*CII).8«UI),R«(26),U«(I08) 

8 2-176 

9 REM Itlfiii PRESENTATION ********** 

19 GRAPHICS 1+16 

20 POSITION 6,2:'' »6 ; ' ': POSIT ION 

6.3:^ »6; 'fian 9 fi.an":P0SITI0N 6,4:' IOj"_ 

25 POSITION 0,?:' *6i' by picco tn. ' 

27 FOR 1=1 TO 50=NEXT I 

36 POSITION 8,12:' •6;"F0R 2 PLAYERS, SEL 

ECT" 

*e POSITION 8,15:' »6;"F0R PLAY, PRESS ST 

ART" 

50 IF PEEK(53279)=5 AND NI=1 THEN POSITI 

ON 4,12:' t6;"2 _ :NI-0:GOTO 78 

55 IF PEEKC532?9)=6 AND NI=1 THEN 280 

60 IF PEEKC53279)=6 AND NI=0 THEN 100 

65 IF PEEKC53279)=5 AND NI=0 THEN POSITI 

ON 4,12=? W!*r :NI=] 

78 FOR 1=1 TO 70:NEXT I:GOTO 58 

99 REM 

100 REM ***** 1 PLAYER ************** 
105 POKE 764,28 

118 HS=INTtRNDCl)*100):IF HS=0 THEN 1 IB 

115 FOR J=l TO HS-UREAD U*:NEXT J 

128 READ A*:P=i:GOSUB I99:GDT0 300 

130 DATA ABOOMINAUX, ACACIA, ACCALMIE , ADHE 

SIF , AGATE, AINESSE , ALAMBIC, ALCHIMISTE , AMN 

ISTIE, AMPHCRE , AMYGDALE, ANTHOLOGIE 

148 DATA AQUARELLE, ASPHYXIE, ASTRAKAN.8A2 

00KA,BELUEDERE,BLASPHEM£,BLI22ARD,CACHEM 

E T , CANDELA8RE, CANICULE 
158 DATA CARQUOIS.CHEPTEL, CLIPPER, CORMOR 
AN,CLOPORTE,CYTISE,DESSEIN,DEXTERITE,OIA 
LECTE,DIARRHE£,OILUUIEN,DORYPHORE 
160 DATA ENLUMINURE.ESTUAIRE.ETAMINES.ET 
HNIES,EXHALER,EXONERER, FAKIR, FALSIFIER, F 
ESTOYER,FUTAIE,GALINACES,GLAIEUL 
178 DATA HECATOMBE.HERESIE, ICEBERG, IDYLL 
E.INOXYDASLE, IN TERUIEU.KIRSCH, KIDNAPPER, 
LftCRYrtOGEN£,LU2ERNE,MAJORDOriE 
1SB DATA MAPPEMONDE.MARSUPIAUX.MASTODONT 
E,nEGALITH£,nORPHOLOGIE,nYRIADES,NOCTAne 
ULE , NONAGENAIRE, NQTORIETE, OKAPI 
190 DATA ORIFLftnnE,OLYMPE,UASSAL,UEHEf1EN 
CE,UODKA,UALKYRIES,XENOPH0BE,2ENITH,RHI2 
OME , RHUBARBE , SAINDOUX , SATYRE , THYM 
3 95 DATA SCAPHANORE, SCHAMPOOING,SOPORIFI 
QUE, SQUALE, STRATAGEME, THEOREME, TRAMUAY, P 
ACHYDERME, PATCHOULI, PHENIX, QUARTZ 
198 DATA PHOSPHATE, PHYLLOXERA, QUASIMODO, 
°£-HG3IQU£,TRAJECT0IRE, JUNGLE 
139 GRAPHICS 1*16:S£TC0L0R 4,0,0:? ft6;" 




M. PICCO 



■^POSITION 6,11:? «6;"PLAYER " ;P :G0SU8 4 

208: RET URN 

208 REM 

201 REM ******* 2 PLAYERS *********** 

282 P=2 

218 GRAPHICS 0:SETCOLOR 2, I2,0:POSITION 

13,4:? " HANGMAN " :POKE 752,1 

220 POSITION 1,8:' " UN JOUEUR ENTRE LE 

MOT EN MEMOIRE ■ " :? :? " ET LE SECOND 
ESSAYE DE LE TROUVER . " 

230 ? :? :' » QUE LE SECOND SE RETOU 
RNE ..":? :? " PUIS , APPUIE2 SUR OP 
TION " 

235 POKE 53279, 0:POKE 764, 2B 
240 IF PEEKCS3279)=3 THEN 250 
245 GOTO 240 

258 ? :? :? :' '■ TAPES LE MOT CHOISI > 
>";:INPUT A*:G0SUB I99:&OT0 300 
299 REM 

380 REM ****** DECOR DU JEU ******** 
318 GRAPHICS 2:SETC0LOR 4,8, 2:SETC0L0R 
, 12,12:SETC0L0R 2,8,2:P0KE 752, 1 :SETCOL0 
R 1,2,14 

320 A=LEN(A*):IF A> 11 THEN 200 
330 POSITION 1,1:? «6 J'hangtnon -> " 
340 FOR X=l TO A 
350 POSITION X,6:' *&;"-■■; 
360 NEXT X 
365 ? CHR*U25),CHR4f.253):' 

AUE2 LA REPONSE , TAPE2 'R! 
370 ? :' " QUELLE LETTRE" ; :INPUT R* 
380 IF R*="RE"- THEN ? CHRtC 125), CHR4C253 
-):? to •• QUE PR0POSE2-U0US >>";:TNPUT 
B* 

390 IF B*=At THEN 580 
399 REM 

■S08 REM ******* ANALYSE LETTRES ***** 
*\9 FOR D=i TO A 

428 B*=AS(D,0):IF B*=R* THEN U=]:POSITIO 
N D,5:? «6;B* 
=50 NEXT D 

468 GOSUB 600:GOTO 3.65 
499 REM 

580 REM ******** UICTOIRE ********** 
510 POSITION 1,3:? fl6;"brovo £":' CHR*£1 
255 :' :■? - VOUS ETES UN HABITUE ?? " :P 
OSITION 1,8:"? M6;At:G0SUB 4208 
530 GOSUB 4!00:GOTO 800 

599 REM 

600 REM ****** PHASES DEFAITE ******* 
610 IF U=l THEN U=0:RETURN 

620 IF T=0 THEN POSITION 18,9:? (t6 ; " 

638 IF T=l THEN FOR Y=l TO 9:POSITI0N 12 

,Y:? fl6;"S":NEXT Y 

640 IF T = 2 THEN POSITION 12,1:? «&;■■ 



:? " SI UOUS 



650 IF T=3 THEN POSITION 14,2:? i6l"^*»P 
OSITION 13,3:? »6 i V 

660 IF T=4 THEN POSITION J6,2:? 86; 9 ":P 

OSITION 16, a:' 06;"!" 

676 IF T=5 THEN 2=176 :GOSUB 4000 

6B0 IF T=6 THEN POSITION 16,5:^ «6; ,, «":P 

OSITION 16,6=' H6;'B" 

698 IF T = 7 THEN POSITION 15,5:' *6;'V:P 

OSITION 17,5:? tt6;"V 

700 IF T=8 THEN POSITION 15,7:? *$;"/" :P 

OSITION 17,7:? «6; "s" :G0SU8 758 

718 T=T+l:R£TURN 

719 REM 

720 REM ****** MOUU.DES BRAS ******** 
722 FOR N=l TO 6 

724 FOR 1=1 TO 150:NEXT I 

725 IF N=l THEN POKE 704,128 

726 IF N=l OR N=>3 OR N=5 THEN GOSUB 4278 
POSITION 15,5:' *6;" ^POSITION 17,5=? 
B6;" " POSITION 15,4:? B6;"^" ^POSITION I 
7,4:? #6;'V" 

727 IF N=2 THEN POKE 704,220 

728 IF N=l OR N=3 OR N=5 THEN GOSUB 4280 
POSITION 15,7:? 86;" '^POSITION 17,7:? 
#6;" "-POSITION 15,6:' 06; *_" POSITION 1 
7,6:? «6;"_" 

729 IF N=3 THEN POKE 704,289 

730 IF N=2 OR N=4 OR N=6 THEN GOSUB 4270 
POSITION 15,5:' «6;'V" :POSITION 17,5:? 
M6j"\":POSITI0N 15,4:? »6;'' " ^POSITION 1 
7,4:? *6;" M 

731 IF N=4 THEN POKE 704,56 

732 IF N=2 OR N=4 OR N=6 THEN GOSUB 4280 
POSITION 15,7:' fl6;'V" :POSITION 17,7:? 
U&;"\" POSITION 15,6:? S6;" '^POSITION 1 
7,6:? «6;" " 

733 IF N=5 THEN POKE 704,105 
735 NEXT N 

748 RETURN 

743 REM 

?50 REM ******* DEFAITE ************ 

755 ? CHR«C125J:? :? " C'ETAIT URAIMEN 

T DIFFICILE ??? " 

?68 POSITION 1,3:' #6;"perdu ?":POSITION 

1,7:? «6;A*:G0SUB 720:GOSUB 4200 
770 GOSUB 4100:GOTO 800 
739 REM 

808 REM ******* REJOUER ? *********** 
805 2=238 :60SUB 4188 

810 ? «6;CHRSC125):P0SITIDN 3,2:? «6; 'PO 
UR REJOUER. .'^POSITION 5,7:? »6;'>res«ez 

■tart" 
828 IF PEEKC53279J=6 THEN CLR :POKE 5324 
8,230:RUN 
830 GOTO 628 

3999 REM ********** TETE *********** 
■>000 B=PE£K(106)-48 



4010 POKE 559,62 
4020 POKE 54279, B 
■J025 POKE 784,45 
4838 POKE 53277)3 
4048 POKE 53248,2 
4050 K=B*256*!024 
4055 POKE K*34,60 
4856 POKE K. 95, 126 

4057 POKE K'96,0 

4058 POKE K*97, 126 

4059 POKE K+98, 153 
1060 POKE K*39, 153 
4061 POKE KH03, 126 
4082 POKE K'181, !26 

4063 POKE K< 182, 126 

4064 POKE K'183,219 

4065 POKE K*184, 102 
4866 POKE K>105, 12b 
4067 POKE K*106,66 
■1068 POKE K»107,66 
4869 POKE K*188, 126 
4078 POKE K+109,68 
4872 POKE K»118,24 
4098 RETURN 

4093 REM 

4100 REM ***** EFFACE TETE ********* 

1355 POKE Kt94,0 

4156 POKE K*95,8 

4157 POKE K.96,0 
4358 POKE K<97,0 
4159 POKE K*9B,8 
4168 POKE K'99,0 
4161 POKE K+108,0 
4362 POKE Ktl01,0 

4163 POKE K. 182,8 

4164 POKE K*183,0 

4165 POKE K«1B4,0 

4166 POKE K*105,8 

4167 POKE K+106,0 

4168 POKE K*107,8 

4169 POKE KtlBB.S 
4378 POKE Ktl03,0 
4171 POKE Ktll8,0 
4138 RETURN 

4200 REM ***** ATTENTE *********** 

4210 FOR G=] TO 385 

4220 SON=INTCRNDC0J*57) 

4238 SOUND 0, SON, 14,4 

4240 NEXT G 

4250 SOUND 6,0, 14,8 

4260 RETURN 

"278 FOR 1=1 TO 6:S0UND 8, 255, 14, I5:NEXT 

I:S0UND 8,0,0,0:RETURN 
"286 FOR 1=1 TO 6:S0UND 0, 6, 14, I5:NEXT I 
■SOUND 0,0,0,0:RETURN 




EXL MANOIR 



A peine I'EXL entre, nous sommes deja envahis de 
programmes ! Pour cette deuxieme semaine, vous 
aurez droit a un magnifique jeu d'aventure ou les ma- 
gnifiques qualites sonores et graphiques de cette ma- 
gnifique machine sont mises en magnifique evidence. 

Valery BRUNEL 

1 PEM 4 a 

2 rem ■>>:/:/:/;/:/. pour exl \m 'as&s&92>& *, 

I REM V. 

4 REM M PROGPHHME DE DE DEFINITION »* ZZ 

5 PEM *J 

€ REM •»» DES CftPRCTEPES UTILISES »«#» TZ 

7 REM " 

e rem ****** DflNS wXmvaoir ******** Vi 

3 REM 2q 
18 REI1 W. REALISE PHP WS&SGe05&&WS>5& 

II REM It 

12 PEM WAVXO. VRLERY &PUMEL 5J^%^%% ^, 

1 3 REM 

14 PEM ^.J-.^'/.ET RLEXfiNDRE B&ftOjm&X&i « 

15 REM Dd 

16 REM * CHfiOUE FOIS Qij£ vQOS VQUDPEZ • 54 

17 REM 55 

18 REM ****** JQUER ft E/ELMRNOIP ****** 56 
13 REM 37 

20 REM ***** CHflRGEZ CE PROC-RAMME tltH 58 

21 REM 59 

22 REM ****** FRITES ' mr,' , PUIS iliin«» 60 

23 REM 61 

24 REM tCHRRCEZ LE PRDGPftMME PRINCIPfiL* 62 
23 REM 63 

26 CLS "UBR" 64 

27 CRLL COLOR' "0Ce" j 
2R LOCftTE '3-7> 

25 PRINT "VQULE2-V0IJS DES EXPLICHTIONS" 
33 LOCATE (7,10) 

31 PRINT "SUP LE JEU «xelm*nolr" 

32 LOCATE < 11-12) 

33 PRINT "(QVN) PUIS ENTER" 

34 CALL COLOR/ "0UB" ) 

35 LOCATE (14,19) 

36 ACCEPT VALIDATE("ON")SIZE< 1>.E» 

37 IF E*«""THEH 33 
36 IF E»«"N"TMEM ?3 
39 CLS "UBB" 



A suivre: 

En raison de la longueur in- 
habituelle du listing nous 
passerons ce programme 
en deux fois. 




CALL COLORC0MB") 

CALL RFC'LE LOGJXIEL extln*Tioir",3) 

CALL AF<"A ETE ECRIT EN DEUX PARTIES", 3) 

CALL AFC'EN RAISON DE LA LONCUEUR", 7 ) 

CALL AF<"DU PROORAMME , IL N'A PAS ETE POSSIBLE", 9> 

CALL AFC'DE DEFINIP LES CARACTERES DANS UN SEUL", 11) 

CRLL RFC-PROGRAMME"- 13) 

CALL EFF<30) 

CALL RFC'POUR JOUER, VOUS POUVEZ VOUS 8ERVIR",4) 

CRLL AFC-DU CLAVIER OU DES MflNETTES" ,6 ) 

CRLL RF<"SI VOUS UTILISEZ LE CLRVIER,"-9) 

CALL AFC'VOUS UTILISEREZ POUR LES DEPLRCEMENTS'M I ) 

CRLL AFC'LES LETTRES '0' , 'N' , ' 3' , 'E' POUR LE8'M3) 

CRLL RFf "DIRECTIONS 'OUEST' , * NORD' , . .«tc" , 15) 

CRLL RFC "VOUS POUVEZ EGRLEMENT V0U8 SERVIR'M?) 

CRLL RF<"DES QURTPE CUR8EURS ", "«.CHR*< 14 )(,•',->,<-", 19 ) 

CRLL EFF(39) 

CRLL RF<"'SI VOUS CHOISISSEZ L'OPTION ' MRHETTE8'" ,3) 

CRLL AFC'VOUS OEVREZ UTIL13ER ",7) 

CALL RFC'CELLE DONT LES TOUCHES SONT ORANGES"-9> 

CRLL AFC' POUR LES DEPLACEMENTS UTILISEZ", 12) 

CALL AFC "HORMALEMENT LE MANCHE",14) 

CALL AFC'EN LE POUSSANT VERS", 16) 

CALL AFC'LA GAUCHE POUR ' 0IJE8T' , VERS" , 18 ) 

CALL RfC'Lfl DPOITE POUR 'EST' . . .♦tc"-20 ) 

CRLL EFFC33) 

CALL AFC'SRCHEZ DU' EXELMRNOIR EST UN"-4) 

CRLL AFC' -JEU D'AVENTURE MRIS RU38I DE",6) 

CRLL RFC'DE REFLEXION CAR TOUS V08".9> 

CALL AFC'DEPLRCEMENTS SONT COMPTES'MB) 

CALL HF<"'ET LES NOMBREUX MOH8TRES ET GARDES 

CALL AFfOUI PRQTEGENT Lfl PRINCESSE",14 ) 

CRLL AFC'SOHT SRNS PI TIE. , , ", 16) 

CRLL EFF'33) 

REM 

REM ******************************* 

PEM *** CRRRCTERES LRBY *********** 

REM ******************************* 



,12) 



W 

.d REM 

?S CALL CHRRC63, "FF81BDR3R3R3R38D81FF" ) 

88 CRLL CHRR<66, "8808FF00900080FF0000" ) 

81 CRLL CHRRf 67. "24242424242424242424" ) 

82 CftLL CHRR<68, "2424E724242424E72424" i 

83 REM ******************************* 

84 REM MM CRRRCTERES DESSINS «*••#*« 
83 PEM ******************************* 
86 REM 

8? PEM MMMMMMMMMMMMMMNM 

88 REM ********* POMME *************** 

89 REM ******************************* 

90 PEM 

91 CALL CHRPC 78. "Q0I309909900808000000" ) 

92 CRLL CHRRf 71 . "000I070F0F1F1FIF3F3F") 

93 CftLL CHAR<72,"3F1F1F1F0F8F070I8000") 

94 CALL CHRR< 73. "0090000000060^60201" ) 
93 CALL CHRP{75,"FFFFFFFFFFFFFFFF3E00" > 

96 CRLL CHRR<74-"70FEFFFFFFFFFFFFFFFF") 

97 CALL CHAR<?6,"0000001C3C7C7CF8F0E0"> 

98 CALL CHAR< 77, "80E0F0FeFyFCFCFCFCFC") 

99 CRLL CHRR<78, "FCFCFCF8F8F0E0600000") 

100 REM MiMMMMMMMMMMMMMM 

101 REM ********** MRLLE ************** 

102 REM ******************************* 

103 CALL CHAR(79-"0000900000B000000103") 
194 CALL CHAP<80,"079E0ClCieiei80F0FB7"; 
103 CALL CHAR< 81, "06060606060686060700"; 
186 CALL CHflP(82."0003060C183060C080C8"; 
197 CftLL CHAR' 83, "E931 I39E6C38F0CI03FF" > 
168 CALL CHftP--84."F606069606960607FF00" ' 
109 CALL CHflR<85*' , 00E0ie08e4e40C183F63") 
119 CRLL CHRpi-8--;, "C3639D193l6U'l['191ni" ■ 

111 CftLL CHflR<87,"03060C18302860C08OTO") 

112 REM HHMM^MMMMMMMH«aMMMItfl 

113 PEM MM«MM RRBRLETE ************ 

114 PEM ******************************* 

Suite page 3 



SIRIUS 



■y. 



COMMODORE 64 



Plus "speed'' que Sirius tu meurs! Ce programme 1 00% 
en langage machine meltra vos reflexes a rude 
epreuve. Le but du jeu est de repousser les sirussiens, 
etres lout aussi etranges que dangereux. 

P. GAUTIER 



A suivre: 

En raison de la longueur in- 
habituelle du listing nous 
passerons ce programme 
en deux fois. 



PEM tore lJi-l 1I037* 

■ •■• .**«... 

: PEHMSIRIUS ATTtO 

. REM 




edito 



■ PftSCRLOSOFl •• 
>••<••*•■•••••• 

'•HtniMMIU 



PEH«»FIMI LE 10. 'II '84 I 
3 ^-••u» •>•••»<• •<••••••• 

6 PEM*».tEiJ leOX LFMOnOE NfiCHINE 

7 P£CH#fiUT£L« PRSCH. i"jftUTIEP USAN8>U 

9 -Li :••••*••••••••»*•••••*••**• •**•*••• 

16 L=L*1 IFL-2Tt€NP0KE?88,32 P0KE792, 193- P0KE49152, 16:? PQK£49153,8 GOTO50 
:>3 & i> ETI-IS1.2 POt(E53280.2 P>>E64^.1 PG*E 1*5.0 POKE 788. 49 
:■■:■ =-;ir ^VMMtMMNMMMW CHRROEMEHT l MINUTE 30 r 

it PRINT-"TT>M»»»»l " 

32 PRINT" 4KMMMM - 

34 PO:E145J.fiSC<" D-64 PQ> £1534, R8C< " J" >-b4 P0KE1431 .flSCCI - >-**: POKE 1511, 76 

35 Fi3ftI = lTO500 GETft* IFH*-"THEHCXT 
40 L0RD s ".li 1 

30 PQkE49134.i4! SVS49900 

? PEM ••♦•••••♦•••••••sirius ATTflCK-PROG NUHERO m—MWW WW 

19 P0KE53 281 .2 P0KE532 88.2 P0KE646, 1 flt="TEMPS DE CHRPGEMEHT 5MM 30SErs" 

20 PRINT".TOftK«liraaaB»M»H", F0P.1 = 1TOLEHCPi»> -F0RJ = 1T04 :PQKE54296,fl P0KE54296. 7 
30 NEXT PRINTMID*'A*. I. if, NEXT F0RI-32TQ9STEP-.3 POKE54296,0 POKE54296,7 

40 FORJ-1T0U3 HEXTXI POKE631 . 131 P0KE198. 1 NEW 

5 P0KE768.49 P0KE792-193 

10 P0KE33281 . 14 : POKE53280. 80 P0<E646. P0KE33265, 27 -POKE53Z72. 21 

29 PRIKTTSHUN JEU ECRU PAR PftSCFIL ORUTIER <C> 1984"; 

25 PRINT" m PflSCftLOSOFT * T 

26 PRINTTmB<12' •«-. -T - 

30 PRINT"r-TRB(lSJ •• & IR:Lj 5aillMHTTflCK" 

32 PRINTTABO)"^— S~ — 

33 PRINTTABOJ-aaSCORE » BflTTP.E ■22408'W" 

40 PRlNT"Bi-TRB<14>" r\ /~s ^\ ■" 

41 PRINTTfiB<14>" II II | |" 

42 PRINTTPB<14>- — (1 II I |- 

43 PRINTTR8<I4>" II II I |- 

44 PRINTTH8<14)-^-' ww -i*- 

45 PRINT"3 >L0RS D'lJN vrjvflOE D'AFFfllfiE INTERPLflNETRIRE. DES CflNIBALUS SIRIUS" 

46 PRINT"(UN£ RRCE DESIRIUSSIENS) PftS DU TOUT PftCIFIOUES ET SOUS CEVELOPPES", 

47 PRINT" &ECIDENT DC VOUS MENER LR VIE DURE JIMS..." 

48 PRINT" ILS SONT BETES 4 NE CESSENT 0E VOUS FON-CER LESSUS SANS", 

49 PRINT" PITIE. SPRINT-* ET VOUS N'hlVEZ QUE 3 VRISSEfiUX. . . 
100 FORI-49152TO33200 RERDR-POKEI-R^S-S+R NEXT : PRINT"*" 

110 IFS X 474337 THEN PRINT"ERPEUR DRNS LES 'DRTR'S- "S^STOP 

120 POKE214.7F0RI"!T017, PRINT- ■; =NBCT 

138 PRINT "TTTTTTT7T PPPUVE2 SUR 'FIRE' DU JOYSTICK tl" 

135 PRINT"* " ; 

136 PRINT" - ; 
148 UflIT653,l SYS49900 

13000 DflTfll69.8, 141.33,208. 141.32,296. 162.0,169.0.157.152.46.232.224 
18018 DRTR39, 169,0. 141,23.208. 169,70, 169.217. 141, 15.208,169.70, 169.0 
18020 DRTR141. 61. 159. 169. 18, 141, 48, 196, 141, 42, 196, 169, 70, 96, 169- 3, 141 
13030 DRTR31, 197, 14], 33, 197. 141. 107, 194, 141, 33, 208, 141, 32, 208. 32. 21, 199 
10040 DRTR32, 21. 1S9, 32. 21, 199, 32, 101, 194, 32, 21, 199, 32, 21, 197, 169,0 
10858 DPTR141, 32, 208, 32, 21, 197,32, 21, 199, 32, 21, 199, 32. 21, 199, 32, 21 
10060 DRTR199, 32, 21. 199,169,0.141.33.208,32.21,197,32.21,199,76,147 
10078 DATfl203,0.0,0.0,0,0,6.0,255,255,255,255.2T.5.16.18,S 
18830 BflTftlS, 1-18.5.26,45,22. 15.21, 19, 19,76, 169.77,141,135.153 
18090 I>RTfll52. 8.1 73- 188. 158. 105. 24. 157, 0.203. 141. 188,158.232.232.224,12 
10180 DRTR203-239. 162.0. 169.58. 157. 1,208,232,232,224,12,288-243- 169,63 



K'?48 

10950 

I0?t"8 



10130 

10210 

132-1* 

\-:kii 
102-0 

18318 
1032C- 

10743 
I8^T8 
18368 
13378 

:*;&? 

10480 
10418 

!84^8 
. 18438 

10448 
13450 
13463 
18478 
10489 
13498 
18388 
13513 
10523 
18538 
13548 
13558 
10360 
13573 
13533 
13593 
19608 
10619 
19623 
18633 
13649 



DRTA12 198,234.234-234, 169,0. 141, 14,288". 173, 38,203. 141.31 

WJTR234 -'34. 234. 234. 234. 234.::-- t ;-4 Z3t i I ZW : -3. 33-203. 1*1 .38- ^83 

DRTR96. 173-1-223. 141. 1. 223. I7i-1 .:., 

DRTM 73. 188. 157, 9. 1.4 1.1. 14!. 188. 157. 173.12.283.141.14,233-173 
DRTRI5. 293, 9, 218. 41, 218, 141. 15. 288. 32- 21. i?r 36.234. 234 127,127 
DRTM73. 183, 157. 141,188, 157,173.193 .157 281 I i4.-i, i 96.206- 15.288 

»Tft206, 15, 208- 234, 234, 234. 173.15. 238. 141. 13 23-. jr" : c . : 8 =■.:-;. t . fj 
DRTft248.1. 96. 173. 15.233.9.217.41.217.141.^ 

DRTR14 1.23. 238. 169 -4, 141, 22, 199, 173. 73, 159.281,123.208,3.32.92 
DRTM193- J2. 168. 197-32,216. 197.32.62. 193- 173, 133, 157.281.1.240,6 
DRTA173. 12-288. 141- [4. 288. 238. 73 159, 32. 21. 133. 32. 200. 28.3, 32. 103 
DRTR200. 76, 129. 235. 7^, 132, 193. 76. 195. 192. 141, 39. 203. 141, 48, 203. 141 
DRTR4 1. 208. 141, 42, 268. 14 1,43, 288. 141, 44. 208. 169. 3. 141. 21, 233, 32 
DflTfil53, 202. 162. 8.189. 133. 192- 157, 238. 5- 169, 14. 157. 238.21?, 232. 224 
IiflTAl 3,293,240. 169. 150. 141, 22. 199.32- 21,199-. '2-21. 199-32.21,199 
pnm32,2 1.199. 32, 21. 139. 32. 21, 199, 162, 0,169, 32. 234. 157. 238, 5 
DRTM69. 15. 157, 248. 217. 232. 224. 13-20S. 240, 169- 255. 141, 21. 208. 96. 234 
DflTfl234, 234, 234, 234. 234. 234, 234. 234, 238, 1.288, 238,3, 208. 238, 5. 298 
LtflTA238. 7.203, 238.9.238.238- 11 -288. 169. 125. 141,73, 159. 173. 1.288 
DRTR281. 225. 249, 1,36, 169. 195. 141 , 248, ?. 141 , 249, 7, 141 .250. 7. 141 
DRTR251. 7. 141, 252. 7. 141. 253. 7. 141, 253, 7. 141, 254, 7. 96, 76, 76 
DRTM73. 1.288,291.225,248,3.76.195, 192,169.8,141,31,197.141,33 
DRTR197, 141. 107, 134, 32. 21. 137, 32, 101, 194, 169. 108, 141, 22. 199, 76/48 
DRTR192. 76- 76. 76. 76, 76, 136, 136, 136,136,136.136.136.136.136.168,168 
DRTR168, 163.169,168,168.168. 168,84,84,84,108,130,100,188.180,188,84 
DRTR84, 84. 84. 84, 183, 100. 188, 183. 188- 188, 84. 84, 34, 252, 232, 252. 43 
DRTF(43. 48, 43. 48, 48, 3. 3, 8. 8. 8. 8. 0.9. 8. 8. 8. 8 

EiRTR9,76,167. 165,165.165.165.165. 165.131.165.165.163,165,164.165,165 
DffTfllfia, 164, 165, 165. 165, 164, 165. 164, 165. 164, 164. 164, 164, 164, 164. 164, 16 
DRTA165. 164. 165. 165. 169, 8, 18,168.3.42.42,42,170,42,170.168.42 
I'm 7*1 62. 173. 136.35.34. 169.85, 1 9, 0. 20. 0,0, 60, 0,0, 235. Z 
DRTfl3,255. 192,3.235, 192, 0. 255, 3,3. 68.3.9.0.0,0,8 
DRTR0, 8, 8, 3, 9,3, 3. 3. 9. 0,0, 8. 3, 0,0, 8. 234 

DRTfi234. 169. 8.141. 4, 212. 169. 1,141, 1.212, 169, 12, 141, 5, 212, 169 
11*^8,141,6.212. 163. 129,141,4,212-96.234,234,234,234,0.234,234 
DRTR2 34, 234. 162. 9. 139. 196, 194, 157. 3.216. 232. 224. 49- 298, 245. 162. 8 
fjftTfil69. 39. 157. 40, 4, 169, 2, 157, 40, 216, 232, 224, 48. 208, 241. 169. 63 
:=i 7~!41 2 ■- J:8 ?. 5-=.. f?. 2 :-r..:;-4,i>. ^83 -24.5.96.155.255- £55 239.255 3 
DRTR255, 239, 255. 11 1.32. 255. 7, 7, 255-255, 255, 14. 14. 14. 14, 14, 5 
DBTB5,5# 5,5.5,5.5,5,1.1.1. I, 1,1,1,1,1 
IiRTFil, 1, 1. 1,8.3,8, 8,8, 8,8,8. 8,8,8,8.8 

DRTR169. 0.141, 193. 204. 169, 3. 141,252.157.169,19,141,59,196.141,52 
DRTR196, 141.24,212.234, 169, 165.141,246.202. 169,231, 141.247,282. 169.33 
DRTR14I. 71, 199, 141. 79. 199, 74. 141. 163. 199- 32. 43. 195. 76. 183,195. 173 
DRTR2,I58,233.64,141.2, 158,96.92. 169.206.141. 135. 196,169,238- 141 
DfiTR192,196, 141. 193,196. 169.286. 141,97. 195. 169,0. 141.218, 158. 169. 119 
DRTR14I .22, 193, 169. 125. 141,22. 193. 169.20. 141 , 107, 194.96.8. 173.52 
DRTR138.9, 1,41,1. 141.52. 158. 173.52.158,231, 1,243,53.238,8 
I'M-*188. 173.0.288,291.24,248,23,96.96.96.238.253-96.96.173,52 
DflTai58.9.8,41,6,141.52. 158.96.96.234.238.0.238. 173.52.138 
IiflTRS, 1.41, 1,141.52. 158.56.234,234,234.234,234.234,238,0.208 
DRTfll 73. 9.203. 201. 193.246-220.96, 162-0- 189. 134,196.157.9,4.232 
DRTR224. 46-298, 245. 32, 136, 194. 96, 9. 8. 255. 255. 255. 32. 68. 202-32 
DRTR176-284, 32. 153. 195. 32, 8, 132/32. 64, 206. 234, 234, 234. 234. 32. 133 
DRTR202- 32. 3. 132, 234. 141. 1.288. 141, 3, 208, 141, 5. 203. 105. 23. 141 
[>RTfl7,208, 141,3.208, 141,11,208,173.21.208-9,255.41.255.141,21 
DRTR208.141, 12.208,3, 170.41, 173. 141,12.208. 173, 13.298.9.225.41 
DHTR225, 141 , 13.283,233.7, 141 . 13,208, 173, 108- 157- 9-8. 41 ,8. 141 
DRTR108. 157.32-190.284.32-238.197.76-53, 199- 173-4.226, 141. 1-212 
DRTR14I, 9,212. 234. 234. 234, 173,4,212,9. 18-41,18.141,4,212,173 
DRTR4. 212. 9. 19. 41, 19, 141, 4, 212. 234, 234, 234. 234, 234. 234, 173, 15 
DRTR212,9.9,41,8. 141. 15,212. 173,5,212.9-8.41,8,141,5 

A suivre 



EXELVISION 



Suite de la page 2 

113 

116 

117 



CALL CHfieca8,"e881070FIE352060402i3 
CRLL CHRR< 89, "1008040201 
CALL CHRPC39, 
CALL CHRR01,"7EFFFF99181818181813" 
CALL CHRP<92,"1818181818993fl3C1819" 
CFILL CHRR<:93,"19I3I9FF989398951808" 
CRLL CHRR<94, "0088E0F0781C0C060204" 
CRLL CHRRf 9!3,'-081020488800000300C0" 
CRLL CHRPf 96, "000ee000000088000000" 
REM * * ####•#»» HWHH I ###«##### 1 1 
REtl »«*»»«»»■ nONSTRE »##•»#««*» «## 
REN «•*#«•**•*» ******* NIIHIMIMt 
CRLL CHRR<97, "007C1F0F070743625247" 
CRLL CHRR l :^e,■'2I2242424I40404132IR , • 
CALL CHARTS, "Wl 2 12 13090804920 108" 
CRLL CHAPC 100, "00000080F9F790000000 
CALL CHRR<101,'-F52RA222C1142RFF7722 
CRLL CHRP' 102, "22y8S8DC-FF000090C13E 
CALL CHRPf 103- "001F7CF8F0F061232339 
CALL CHRP' 104, "C222R121C10I01C12628 
CRLL CHAP' 105--28R4R4E4C803I920C000 
REM ******************************* 
REM ***** CRPACTEPE8 CHATEAU ##MM 
REM ******************************* 
CALL CHAP"" 48, "00000000030880000000" 
CALL CHARi-49,"0000000030019jI038707" 
CALL CHAP< 50, "3C3C7FFFFFFFFFFFFFFF" 
CALL CHRP'; 51 , "800000000080C0C0E0E0" 
CALL CHRP''52,' , 00060F1F3F7F7FFFFFFF" 
CALL CHRP'' 53, "97IFIF8gC0E8E0F0F0F0" 
CALL CHRP< 54, "FFFFFF81 81 9999999599" 
CALL CHPP'55- "F3F8F8818387373F8F8F" 
CALL CHRP-:56."0060F0F3FCF£FEFFFFFF" 
CRLL CHffi(S7/ "30303636363636303018" 
CRLL CHRPC57, '■30303636363636303030" 
CRLL CHAP' 110, "C1C1C1C1DODODOFFFF90 
CALL CHRRC 111, "91313181818181818100' 
CALL CHRPC112."83838383Se8eeBFFFF00' 
CRLL CHAPf 113, "0C0CeC6C6C6C6C0C0C0C 
8C06830 1000000900030' 
0C860301 000000083338' 
"8,0090093C0C0C0C3C3C3' 
3000093C7EE7A52424FF ' 
903380080 1 3383C 3C3C 3 
I83360C3800090000000 
C3C3C3C3C3C3C3C3FFFF 
242424FF242424FF2424 



171 REM 




172 REM 


— VOUS RLLEZ TOUT D'RBORD — 


173 REM 




174 REM 


- LE CHRRGER SUR UNE CRSSETTE - 


175 REM 




176 REM 


VOUS P0UVE2 MfllHTENRNT 


177 REM 




178 REM 


TRPER LE PROGRAMME 


179 REM 




180 REM 


PRINCIPAL DU JEU 


181 PEM 




182 REM 


<<«<<<<< ex«lm*noir >>»»» 


183 REM 




184 PEM 




185 REM 


( IL EST IMPOSSIBLE PE TAPER) 


186 PEM 


( LE PROGPRMME PRIUCIPRL A LA 


187 PEM 


( SUITE DE CELUI-CI CAR LR ) 


188 REM 


< MEMOIRE DE L'EXL 199 SEPRIT ) 


183 REM 


< PLE1NE ) 


198 REM 




191 REM 


(Pour les Paresstux dw clavier) 


192 REM 


's?chez flut les Ii*ne«) 


193 REM 


( COMMTOCATlt Ptr "REM" ne sofit > 


194 PEJ1 


(pas indisPensables 1 . . . > 


193 PEM 




196 REM 




197 REM 


//s///// eou COURfiCEl f/stss*f* 


198 REM 




199 REM 




209 PEM 


******************************* 


201 SUB 


RF'R*,X) 


282 LOCATE ' Y.. f 40-LEHffl* ) 1/2. > 


203 PRINT A* 


294 SUBEHD 


205 SUB 


EFF' G > 


286 CALL 


RF<"EHTER"-2I ) 


287 PRUSE C 


298 CL3 




209 SUBEND 



CRLL CHRP' 114 

CRLL CHRP' 1 14 

CRLL CHRP' 115 

CRLL CHRP': 116, " 

CRLL CHRRC 117, ' 

CRLL CHRRC 113,' 

CALL CHAPC 119, ' 

CALL CHAR( 129,' 

REM 

REM __ VOUS RVEZ MfllNTEHRNT TAPE __ 

REM 

REM LA PREMIERE RAPT IE _ 

REM 

REM DE CE PROGRAMME 

PEM 
REM 
REM •••#•• CE N'EST PAS FINI! ***** 



1 ! 

2 ! ifttlW-ft ROUP e/1 199 '-XC^'X-XCC: 

3 ' 

4 i ««<«« txttMinolr >?>>>>>>>>>>> 

3 ' 

8 i trttxt Bo»«dJi*Ti Rle>r*!ftdr* **t**« 

9 i 

19 ! ******* Brunei ,V*Ur» ******* 

11 i. 

12 RANDOMIZE 

13 GPAD 

14 TIC»="9D7C91B2BRB602FC" 



15 Q«="9DE63356CDA6279BDAfll3032A8338F833325AD88CA8 
5384442BBD13E" 

16 S»-"977C312DD46D6F70?213Er.€9972B38C19C66308211F 
4R0072D6841823E93I6ER6637BAD" 

17 TS="18D6E74A213?DE3443BDRD18E7e34A319CD6846339R 
D18C6634A2118D68442D6A3I8B5R" 

18 1J*="D4R21RD5R84635RR518D4R34A21295R844294RD1FF" 

19 CLS C'UBb") 

23 CALL COLOR<"0PHL"') 

21 LOCATE -:i0,6) 

22 PRINT "EEXXEELLMMRANNOOIIRR" 

23 LOCATE <11,6> 

24 PRINT "EEXXEELLMMRANNOOIIRR" 

25 CALL COLORC "1CB") 

26 LOCRTE C9,2?> 

27 PRINT "01239" 

28 LOCRTE < 10,29> 

29 PRINT "43679" 

30 LOCRTE ', 11,29) 

31 PRINT "9noP4" 

32 LOCRTE ( 12,29) 

33 PRINT VstUV" 

34 LOCRTE C 13,29) 

35 PRINT "0WXU0" 

36 FOR ARM TO 3 

37 U«=S«&T*8.Ut 

38 CRLL SPEECH<"L,"fcH») 

39 PAUSE 2 

40 NEXT AR 

41 REM 

42 REN «*«••** INITIALISATION ********* 

43 PEM 

44 DIM N<69),Sf 60),O<;60).E(60)-V(60),XflC60),YRC60), 
RR«< 43 ), VMRX< 43 ), VMIN< 43 ) 

43 DIM VflC69),Fflf6').FB<6) 

46 RESTORE 334 

47 FOR 1-1 TO 60iRERD N< I ),S( I ), OC I )-E< I), XRC I ). 
YAfD'NEXT I 

48 REM ****** INITIALISATION OBJ ****** 

49 FOR 1-1 TO 43'PERD RR8< I >, VMIN< I ) - VMAX< I) 'NEXT 1 
30 PEM HHMIMI1 VIVRES IIMIIIHMII 

51 FOR 1-1 TO 4 

52 LIEU»IHTPNDf5e)-*2 

33 IF VCLIEU)<>0 THEN 32 

34 V<LIEU)"I 

36 REM *********** RRGENT ************* 

37 FOR 1-5 TO 8 

38 LIEU-INTRND08H2 

39 IF VCLIEUJO0 THEN 39 

60 V(LIEU)-I 

61 NEXT I 

62 REM IMI*M»« TRESOR ************** 

63 FOR 1-9 TO 12 



A suivre . 
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. . .... .... 

■ 

■ ■ 

arrit. ■:■ 

'• 
Qui est pr&fail de Comn 

et il mm de oagner la ■ 
• ■an 3 Texas if: 

dftbutde rannte. 
A la fin du dew 
1984. Atari se retrouve avec un 
petit d6couvei sur son ccn-p:; h 
banque- 700 millions de :: 
Jack Tramiel, toujoufs :-. 
de CommorJore. est cc 
considere le 'business - i 
une guerre et il vient de gagfter 
une deuxieme bataiile. 
Mi 84, jack Tramiel s'engueuie 
avec les actionnaires de Commo- 
dore (iis relusaient un poste de 
direction a son Jils) et il claque la 
porter il va aiier porter ses hu- 
meurs belliqueuses ailleurs. Ses 
dermeres performances plus que 
concluantes et le gout du usque 
des banquiers amgricains lui per- 
mettent sans probleme de r6unir 
quelques dizames de millions de 
dollars. Avec cette menue mon- 
naie, il rachete Atari qui a plus de 
800 millions de dollars de deties 
et peul employer ses fils. ses 
Mies, ses parents et ses grands 
parents sans qu'un bete conseil 
d'adminisiration vienne lui cher- 
cher des poux dans la tete. II va 
mainienani pouvoir entamer une 
nouvelle guerre et. cette Jois-ci. il 
ne se contente plus d'attaquer un 
adversaire a la fois. la guerre sera 
mondiale ! 

La (in de rannee a ete" caime: les 
Atari 600 et 800 XL. brades au 
tiers de leur prix. ont (ait rentrer 
un peu d'argent dans les caisses 
en attendant le grand chambarde- 
ment de 1985: des ordinateurs (a- 
milraux et professionnels. hint 
bits et seize bits, a des prix tene- 
ment bas que les concurrents ne 
pourront rgagir que de deux 
facons: paniquer ou se poser la 
meme question qu'ils se posent 
depuis que Jack est sur ce mar- 
ctie'. "Comment tait-il V 
Le 5 janvier dernier, le Consumer 
Electronics Sbow de Las Vegas a 
ouvert ses portes et pour un 
show, nous avons eu droit a un 
grand show de Jack. Ses premie- 
res armes fitaient la. Les quatres 
ordinateurs huil bits de la serie 
XE attaquent Commodore, les 
Apple 11. les IBM junior et les [a- 
ponais MSX (meme le diabolic 
Yamaha MSX a droit a son 
concurrent Atari 65 XEM specia- 
lise en musique). La sCrie ST. 
avec son micro processcur Moto- 
rola 68000 16/32 bits, se mesure 
a armes egales avec le Macintosh 
d'Apple. Et les prix volent en 
eclats, trois a quatro fois molns 
cber que les concurrents avec des 
performances gfinfiralement supfi- 
rieures ! Le salon d'Hanovre en 
Avril verra dribarqucr les 32 bils 
de Tramiel. ce sera au tour des 
professionnels de mautfire le ge- 
neral en chef des armies alarien- 
nes. 

L'ambiance du salon de Las 
Vegas etait done quelquc peu sur- 
voltee. Commodore et les jjpo- 
nais MSX semblaient relatlvemcnt 
decontractes puisqu'ils prescn- 
taicnt eux aussi leurs dorniors re- 
jetons. Par contre, les autres 
constructeurs se sont contentes 
de (aire des declarations deten- 
tion. Ce numero est done ptes- 
qu'entierement consacre a ces 
nouveautes, qu'clles aient oto 
reeilement presentes au Consu- 
mer Show on seulement dans les 
conferences do presse de ces 
messieurs de la familic informati- 
que. 
L'annee 85 ne va pas etre trlste ! 



Gerard Ceccaldi 




DEMON 



Non. ce nest pas un jeu. Demon est un moniteur de- 
sassembleur- Vous allez enfin decouvrir la vie secrete 
du spectrum. 

Jean Yves CELLE 

Mod© d'emploi 

indications qui sonl dans le programme 



S REM •»•*#•••••«••••»••• 

s rem progreaae demon 



10 
[a 



-INT 



__ Otf FN Ml.. . 

23 DEF FN S|IN,fl|l>A|i TO N) 

38 06F FN GKN1I-FN S114-LEN M 

»■§'♦"• 

4is ao to ie« 

A3 
44 

*3 REM CoriMirnon 41:1 --> hex 



58 LET Fl«4 If K<338 THEN LET 
FL-3 

55 PI" MtiFLl 

53 FOR g.FL TO X STEP -1. LET 
-K/16 LET P-lP-INT P)el6 

65 IF P<«9 THEN LET Mli»iiSTR| 



T 8|o"INC "*Oi RETURN 
410 

420 ' 

\SI- 

443 LET I.I.I 

44S LET lO-ai.J CO SUB 105: LE 
T K.PEE* I 00 SUB 50 LET 61-"L 
"+01*". •♦M» 

468 RETURN 

4SS 

460 LCT I0-J.39: 00 iuO 105: LE 
T CJ-QI 

463 RETURN 

470 

471 

47B REM In»UucUon» preflxeei 

par CO" 

ifii 

, fnen'CEf ' io-ia'*iNf~(R/a> 

00 SUB 105. LeT Bl-01*" "i LET I 
0»31*FN NlA.B). OQ SUB 108: LET 




IF Pi.10 Tl 

.55) 
LET K-INT 



i LET 



) -CMR 



96 
97 

100 REn ' - ■. dea uiitir. iign 
i r> caii Fa ><u leaent 

102 
103 

106 LET 31-"' 

110 FOR 0-1 TO 7 

11B IF 01 (10,9) - '•'' THEN RETURN 



St-SCCI QO TO 1000 

SOB LET 10.17. INT IH/841 : 00 3U 
B 105: LET B1-0|*5TR| I INT IFN H 
IA.64) /fl) ) ♦■•," : LET IO-aitFN MIR 
,8) QO SUB 105: LET QI-BI.C! 
TO 1000 
510 LET EM"" 

Sia If 3-345 THEN LET B1»"L0 IP 
,hl M : 00 TO 1000 
515 IF Z-0 THEN LET I0-J*33: 00 
SUB 105: LET Bi-"RET "♦01: 00 T 
1000 
538 IF Z-3 THEN LET E1-"JP " 
52S IF Z"4 THEN LCT El-'TRLL " 
538 IF El<)"" THEN LET 1-1*3. L 
ET I0-J+23: SO SUB 108 : LET Bl-E 
1*01*",": 00 SUB 00: LET Bt-Bl+F 



961 
1080 LET 01(371 •■■ (hi) t " LET 
• 131) ■"M* ": LET 0H57X0IO 

11 LET 0«161) -"JP (hi) " 
1818 IF Li«>"" TMEN IF PEEK 11-2 , 
i i>203 THEN 00 SUB 140 IF MRS ■ 1 | 

THEN LET 1-1*1 
1088 LET 1.1*1 LET K-CO CO SUB ; 

SO 
1898 PRINT COiTRB 7 , FN G1(H|>,TA 
B 14;BI 
1837 
1830 IF PECK 33860.81 TMEN CLS : 

GO TO 160 
1835 IF PEe* 33860-63 THEM INPUT 

■niui iditiu caunnit 7 ";I 
1840 GO TO 210 
1495 
1496 

149? REM Lists dea nnaaomquai 
1496 
liOfl 
1500 . _ 
1588 RESTQI 
1583 LET LI. 

1385 FOR T.l TO 76: READ OUT 
NEXT T 
1518 RETURN 
1511 
1513 

1515 ORTfl "LO * ",-R00 a . *" 

DC a,*", "SUB a,* ","3BC a, 
AND • ","XOR • "."OR • 



3174 

3175 CLS : INPUT "N01 

the 7 ",NJ 

3188 INPUT "ftdratit d ' 



3197 REM R a : 

3190 

3199 

3300 IF Ri-"Z 

"fldratie dtpai 

NPUT "fidreaaa 

I TO F: POKE 

5118 

3305 

2318 IF Rl.'-R 



2238 IF R1-"E 

: 00 TO 3480 

3331 

3333 

2223 REM Iran* fan 

2324 

2338 IF Rl.'T" TMEI 

"P-dft*-- 



zone Kioiri 

THEN CLS : INPUT 

da R.a Z. ";I. I 

t fin - ;r -, FOR t» 

8 NEXT t. 00 TO 

TMEN CLS : 00 TO 
THEN CO SUB 4000 



/■cV 



dt dtfti 
'-tut* a 



CLS : INPUT 

•-;!: input "Ad 
on ";T: input 
nilartr ";N; C 



1520 DRTR "RLC 
L * ","RR t 

* ","SLI * ' 

■ ■Res * " ' 

1535 DRTR 



"RRC 



","SLA * -."inn 

,"SRL * ■•.■'BIT 4 
SET > 



1530 Dfitfi "bc»'!"dt«" ,' hi*" ,"»P» all 



134 

133 

137 rem »/p utiiiit pour iaprea 
ils- =(i instruction* d ' INDEX 
138 

133 

148 LET ZZ-LEN Bl: LET MRR-0 

143 FOR T.l TO 10 

143 IF T»a>ZZ THEN RETURN 

147 £f BltT TO T.Jl.'C'tLI TMEN 

LET HAR-i 

:s; SEXT T 

lb5 RETURN 

157 

IBB 

160 GO TO 5000 

183 

183 

197 REM 



m 



SOS SO SUB 1580 

307 

310 LET R-PEEK X: LET CO»I 

315 LET Z.FN H (R,8) 

330 LCT J. INT (A,-S) 

335 IF A-303 THEN 00 TO 500 

330 TF R-337 THEN GO TO 650 

335 XF A-0 TMEN LET Bi.-NOP"- G 

TO 1088 

543 IF A-B THEN LET 81a"EX *f .1 

1 '": GO TO 1800 
{45 IF H(64 TMEN 00 TO 300 



540 IF K-l THEN LET E1-"P0P " 
543 IF K-B TMEN LET EJ»"PUSM " 
380 IF El<>"" TMEN LET I0.43*IN 

T (A/16): GO SUB 105: LET Bl-Ei* 

= : 00 TO 1000 
558 IF Zs6 THEN LET I«I+1; LET 

IO.J-33. GO 3UB 108: LET S«.gi 

LET K-PEEK I: 00 SUB SO: LET Bl- 

560 IF Z-7 THEN LET K.fl-199: GO 

SUB 50: LET Bt«"RST "♦Hi: 00 TO 

1800 

865 IF K>9 THEN LET IO-INT (fi/1 
6)447: 00 SUB 185: LET St-Ot' 00 

TO 1000 

570 IF R*331 THEN LET Lt""IX": 
GO TO 800 

375 IF fl-283 THEN LET L|."IY" 
00 TO 800 

BBO IF R-343 THEN LET Bt«"OI" 

565 IF R-351 THEN LET B«-"EI" 

390 IF fl-333 THEN LET B«-"EX d« 
,hl" 

595 IF R-a37 THEN LET B|."EX (* 

500 IF R.311 THEN LET I«I*1: LE 

T KopeEK I: GO SUB 50: LET B1="0 

UT I"*H1*" J ,a- 
605 IF R-319 THEN LET I«I+li LE 

T K.PEEK I: 00 SUB 50: LET B|."I 

N a, (■'♦«« + ") " 
610 IF S.195 THEN LET I-I.3: 00 
SUB 90: LET BJ-"JP "*FN 01<H() 
618 IF R-305 THEN LET I»I*2: 00 
SUB 90: LET B1-"CRLL " +PN GKMI 



.- .0 100O 
350 IF Rtl36 THEN LET I0«13»J. 

30 3UB 105 LET 8|-"LD "+0»*' - ,". 
'" SUB 108: LET 81 



J .}''. 


00 TO 


1080 


-.-,:■ 








•-,.-.] 
















EOFi 






kit 


















l!t 




i: ; : 


R 


PEEK 



LET I0«31*Z: 



. — LET IO-U-14. GO SUB 105- LE 

T st.ot ^ct iG.ai»z oo sub ios 

LET ai-BOCa 00 TO 1000 
370 
371 
375 REM COd« in*truction» t 48d 

300 

3B1 

300 LET 10. InT (R/161.39: GO SU 
B 105 LET UjsOl 

308 IF Z-0 ThEn GO SUB 320 00 
TO 1008 

310 CO Sue 338.30.Z 



.338 LET 10-31*. 



GO SUB 105 LE 



335 LET 1-1*1 

330 LET K-I.PEEK I*1-INT (PEEK 
I/128i»256 00 SUB 30: LET Sl-Bl 
•FN Of(H«l 

335 RETURN 

337 

340 IF FN Klfl, 181-0 THEN LET 10 
-31. GC SUB 105 LET 6|-"flOD "*fl 
■ *" . -*U1 RCTUPM 

343 

345 LET 1.1*2 GO SUB 30 

350 LET Bl»-i_& " >U|. " , "*Fn OKH 
» RETURN 

352 

360 IF R-32 THEN JO TO 373 

363 LET I.:.a CiO SUB S3. LET X 
IF --:•* THEri LBT 10 
SUB 183 LET 8|i"l& '"*/ 
«* "i , *0| 

s.?S*,i« fis, i 2 Th * Er ' -- T 10.31 00 
SUB 185 LET Bt-'Lt "««•>", t"«Xt 

366 IF fl.30 Then l.ET o«*"LO >'* 
.366 if.ft.5fl THEN LET B1»-'L0 a,( 

370 RETURN 

371 

373 IF FN MlR.lBtalO THEN LET L 
•-"a,": LET El«-\ GO TO 376 

374 LET Ll«'- LET El-",a" 

376 LET 81-"LD " .Ll»" ( " *U*»" 1 " . 
-t RETURN 

378 

3B0 IF FN M(R.16)-11 TMEN LET B 
l.-OEC ' GO TO 390 

303 LET B«b"INC " 

390 LET RMB1.U* PeTjBn 

480 LET TO.ai.j GO 3UB 105 LE 



cliona prt ' 



663 >-ET J-INT . 

668 IF R>159 THEN LET IQ.FN M (fl 

,41*63. 00 SUB 105: LET Bl-Of: L 

ET Z0-J*47: 00 SUB 103: LET Bl-B 

1*01 GO TO 1000 

670 LET Z-FN MIR.B) 

675 IF Z-0 THEN LET I0-J*13: GO 

SUB 105: LET B«-"IN " *01*" , ( C ) " 

: 00 TO 1000 

680 IF Z-l THEN LET I0-J*13. GO 

SUB 103: LET Bl-"OUT (C) ( "+Qt! 

00 TO 1008 

653 LET IO-INT lfl/16)*35 GO SU 

B 135 LET Xl-Ol 

690 IF Zt>2 TMEN 00 TO 710 

393 IF FN MIR, 16! -a THEN LET Bl 

-"SBC hi," 00 TO 785 

700 LET B1-"RDC hi," 

705 LET Bl-BC*Xl: 00 TO 1000 

718 IF Z<>3 TMEN 00 TO 730 

713 LET 1-1*3 00 SUB 90 LET E 

1-FN 0«lHt) 

728 IF FN M(R,16)a3 THEN LET B| 

» LO ' .-.£•♦") , *X» CO TO 1800 

735 LET fll»"LO -*)(%*■■, ("*£•♦") " 

: GO TO 1300 

758 IF Z-7 THEN LET I0=J*63: 00 

SUB 185 LET B«.0» 00 TO 1000 

755 LET Bl-' " IF P.-66 TMEN LeT 

Bl- NEG ' 

760 IF R. 39 THEN LET B1-"RETM' 

765 IF ft. 70 THEN LET BI-"IM 

770 IF 0-77 THEM LET B*-"RETI 

7-S I« a-39 THEN LET B«i"IM 1 

70« IF «;-J. TM_N LtT BSa-IM 3 
■ ■ 

790 

791 

795 REM Ins'.rocuor.* d " INDEX 



"JR NC *",-'dR 

'■."RRCR a ","fl 
nnn * "DRR » " . "CPL 
, "SCF a ","CCF • 
1545 OPTR "NZ *","Z a","NC *","C 

a'V'PO ♦"."PE *",'"P »", -, M a" 
1358 ORTR '-bca" ,"dt»" ,*'h la" ,"a I a 

13SB ORTR "RET * " , "CXX a " , " J 

P (hi) ■■," «" 

1580 ORTR ■'LD»","CPa",-'lNa","OUT 

a", "I*" ,"Oa","IRt","DR»" 

1565 ORTR "LD i,a*", i, LO r,H","L 

»,ia","LD a,raV'RRO •'•,"RLD t 

1570 
15B0 
1590 

1990 REM tunt.ntn 

1991 REM Momitur 
1993 REM mm.i»m»h 
1995 

1996 

1996 

3000 IF Rl-"0" THEN 00 TO 3088 

2001 IF filo'T TMEN GO TO 3020 

3002 

3003 

3O04 rem lancaaant rouilnt CM 

3005 

3006 

3007 CLS : INPUT "Rdrasat da la, 

rouiint 7"; I 

3010 POKE »t» -33.383 

3013 POKE ne»*21, I-INT (I/a56) *3 

36: POKE na»*a3, INT 11/256): RAN 

DOMIZE U5P (m«n*28) : 00 TO 2305 

3015 

3016 

2017 rem Convaraion 

30 IB 

2019 

3030 IF Rla-C" TMEN CLS : GO TO 

2034 

aosa go to sioo 

2834 input ■*Donn«« a convartir " 

;xa 

2838 IF XI. "O" TMEN GO TO 5110 
2837 IF X«(l)o"t" THEN LET r '" 
L X»: LET D-K 00 BUB — 



rt»i 

"Nb (. .- 

O TO 3330 

3337 GO TO 3235 

2330 FOR j-8 TO N: POKE T* 

<I*j) : NEXT j: CO TO 5110 
3331 
2233 

3333 REM duap ASCII 
3334 

"^38 IF Rto"OR" RND fi|o"l 
EN PRINT RT 31,7, FLRSM 1, 
ION INURLIDE '' : PRU3E 80: 
B 5350: CO TO 3800 
333? CLS 

2338 Input "fidraata d* depart 7 
";I: LET B-I 
3348 IF FN MII-B,4)-0 TMEN PRINT 

: LET K-I: GO SUB SO: PRINT FN 
Gt IMt) ;TRB 6; 

2348 IF R1-"6h" THEN LET K-PEEK 
I: 00 SUB 58: PRINT HI," " ; : 

3 TO 2263 
358 If RI--DP" RND PEEK I>31 TH 
EN PRINT CHR1 (PEEK I) i " 



3809 

3010 ORTR 50.0,91.337,67.1.91.33 

7.63,3,91,34,5,31 

3813 DRTR 237 115,7,91,331,34,9, 

91,253,34, 11,91,239,345,337 87 

3838 DRTR 58,13,91,337 45,80,14, 

91.333,34. 13,91,239,341,325 

3835 DRTR 237,34,17.31,337,301 

3038 

3048 

3050 

4800 CLS : PRINT RT 0,10, 'RTTENT 

ION" : PRINT : PRINT 

4085 PRINT " Powr daa tapiant 
aiions dt coda aachint tn aoa 
• at da rrm n'oubuai pat da • 
Odi f iaz RAMTOP . " . PRINT 
4810 PRINT "POUr un 46K : ■ PRIN 
T 'CLERR (65365-Nb d'OCtttl)": P 
RINT : PRINT "Pour un 16K : : PR 
INT "CLERR (33598-Nb d'Odattl" 
4813 PRINT Bl,"T»p«r ENTER POW 
r conlinytr" PAUSE 0. CLS 
4030 RETURN 
4034 
4040 
4080 

4699 REM .ii.MMiiuiiiH. 
4980 rem Manu principal 

4901 REM ti.t turn 

t||! 

5880 CLEAR : PRINT RT 1,7, FLASH 

1, BRIGHT 1,"»*# DEMON ♦»•" 

5003 PRINT " 



5010 PRINT 

MONITEUR 
S01S PRINT 
CTRUM 
5030 PRINT 



.. IF P1--S" ' 

O TO 3238 
cEttee IF Pl-"6" TMEN 00 TO 5110 
2266 IF Pi-"R" TMEN LCT I-I-9: 
ET B-I+l: PRINT 
3278 LET 1-1*1: 00 TO 3348 
2398 
3395 

3396 rem continue ragiitra 
3297 

2300 PANDOMIZe USR 1MEM*33) 
3305 LET K-PEEK n « n . 00 SUB 60 
PRINT •' a- ";H1 
2310 LET I-a«a*2: 00 SUB 90: PI 



5003" PRINT - ""!. 

DESASSEMBLEUR -- 

pour ZX SPE 
•*»»*t*tt**»t(*ta 
5025 PRINT "l 
3830 PRINT "I 
3038 PRINT "J. 
3043 PRINT "l 
5050 PRINT ■'! 

--) QUITTER PRO 
--) DE3RSSEHBLE 
5065 PRINT "!. 3 --> MONITEUR 
5070 PRINT "! 



£ CELLE J.Y 



MENU 



S05S PRINT 
ORRHHE 
5068 PRINT 



SUB 90 



3315 LET 

NT '■ da- 

2320 LET Iaaaa*6: GO SUB 90 

NT - hi- ",FN Of IMS) 

2333 LET I-a«si*6: 00 SUB 90 



BUB 30: LET XI 
._ Tr -" 
... LET 10-LEN XI 
3035 IF 10<>3 RND 10 < >5 TMEN GO 
TO 2024 

2040 IF 10-S THEN 00 TO 2056 
2046 IF CODE XC121 > 70 OR CODE A% 
(3) >70 THEN GO TO 2824 
2046 LET K = 16»C0DE X» (21 - 1 12* (CO 
DE Xf(2) >57) .CODE X % ( 3) -7 t (CODE 
/Ii3) >57i -616: GO TO 3080 
2058 IF CODE X»<2)>70 OR CODE XI 
131 >70 OR CODE X«IA)>70 OR CODE 
»i3) >70 THEN GO TO 3034 



NT " tp- ".FN 01 (Ml) 

3338 LET I-a«a»10: 00 SU5 98. PR 

INT ■" IX- ",FN 0|(M1) 

3335 LET I-aaa*13: 00 SUB 90: PR 

INT *' IY- "; FN OKMD 

3340 LET K-PEEK (aaa*13): 00 SUB 

38: PRINT " i- ";M1 
3345 LET K-PEEK (at*. 14) 00 SUB 

50: PRINT " r- "iMt 
3350 LET II-"": LET A-PEEK (»«»+ 
18) 

3363 FOR t-7 TO STEP -1: IF IN 
T (R/3tt)-l THEN LET If-Il*" V ; 
LET fl-fl-3tt: CO TO 3360 
2338 LET I»-Il*"0 ,T 
2368 NEXT t: PRINT " f- "ill 

?3G8 LET I-aaa*17: 00 SUB 90: PR 
NT " !»o) - ".FN GKMI) 
3370 PAUSE O 
3375 00 TO 5110 
3360 
3383 

3383 Rem cKaroeur ntxi 
3366 
3387 
2480 input -fidfiise da charganan 



^875 PRINT : PRINT : PRINT I" PR 
SSEZ EN MODE ", FlRSM 1, "CAPS 

LOCK" 
58B0 LET Ri-"OO08": LET aaa-3339 
6 
5093 INPUT "Enirai votra choix - 

5897 if Rl-•■e ,, THEN CLS STOP 
5100 IF Ri»"l M THEN GO 5UB 5180: 

GO TO 200 
3105 IF RH>"3" THEN CO TO 8095 
5107 00 3UB 3000 
6118 00 SUB 5200 CO TO 3000 
5130 
5133 

5150 CLS 

5155 PRINT : PRINT "Duranl la da 
laaacabiaga .una action aur 
raaanara 4u aanu.": PRINT : P 
rint "Pour aodtnar I'adratta <o 
uraf) t«an t rai S pud la ntm a 



iieabl. 



MENU MONITEUR 



"J I 



1793.1C0DE X1I3I >57) *16*CO0l 



• (3) - 
€ Xll 



PRINT F 



u jud in: i-«ini nil ' 
, 3410 PRUSE PRINT 



?~,^ 



LCT 



330 LET 1.1*1 LET F-PEEK 

IF F.127 TMEN LET F-F-336: 
El-"-" CO TO 810 

503 LET Et-"*" 

613 LET K.RB3 F: GO SUB 60 LET 

F|. ■ i- *L1*EI*H1*') " 

618 IF PEeK 1-54 THEN LET 1-1*3 

LET KaPEEK I 00 SUB 50: LET B 

■ ■'■LD '*F|* .".Hi 00 TO 1030 

530 LET 3a 131) -Ll»"< 
01137) -Fl LET 01(57) 



LET 



2885 CO TO 2034 

3395 

3096 

3097 rem nessage ASCII 

2898 

3099 

3100 IF Rf*"EM" THEN GO SUB 4800 

: INPUT -fldrasie da d*but d tnpi 

■rjiatton du rastage ASCII ";jf: 

00 TO 3105 

2182 GO TO 2115 

2185 PRINT *-«nircz i* Massage " 

INPUT M» 
2110 FOR t-I TO (I*LEN M«-l) PO 
KE l.COOE Mllt*l-I' NEXT t 00 
TO 5110 
3113 

3118 IF Mo"3" THEr) 00 TO 3170 
2133 
3136 

3137 pen tave routine CM 
3120 
3133 

3130 CLS INPUT "Adrettc d< d 
abut d« rouitnt "* " , I 
3135 input "do* bra d 'octets 



I.TRB 13, 

-'AT 0,8; " 
LET Pl» I 

NKEY1; IF P1--0" THEN 00 TO 5110 
3415 IF Pi="R- THEN LET I-I-l: P 
RINT GO TO 3405 
3420 IF Pi^'S" THEN PRINT : INPU 



"Net te .ad 



cou 



5160 INPUT -ad 

« "il 

3153 CLS 

5163 RETURN 

5170 

5175 

5180 REM ***** 

5165 REM Man 

5190 REM ***** 

5195 

5197 

5200 CLS 

5305 PRINT "M_, 

S2id PrInT - "!, 

5315 PRINT "! 

I " 

6220 PRINT "I 

5335 PRINT "I 
xadtoaai I" 
3337 PRINT "I 
siajt ASCII!" 
5338 PRINT "l^ 

3339 PRINT "I DM > Ouap haxaa 

nmoin I 

5S31 PRINT "• DA > Duap ASCII 

aaaoi 1 1 I " 

5333 PRINT '*}_ 

5333 PRINT "I R > Conlenu r 

taiiift* I" 

5^35 Print ■■; T » Tranirert 



Editaur ha 
Edltaur aa 



2425 IF CODE PK46 OR CODE P|>70 
"'" -ODE Pl<65 TH , 
'ENTREZ DES C . 



OR CODE P»>57 RND CODE PI 
tM PRINT III, AT 0,0,"ENTRr T 
ODE HEXR l": 00 TO 3410 
3433 PRINT Pi; 
3438 LET N1-N|*PJ: IF FN M (LEN H 

S,3» -0 THEN PRINT " ", 
440 IF PloCMRl 13 TMEN 00 TO 3 



C^argaaant 
Sauvegarda 



3468 LET N»-"" 00 TO 34»B 

2463 LET Xi-Nlt TO 3): LET Nl-Nl 

(3 TO >: LET B-16.C00E Xilll-113 



CODE 
ODE^Xl 



T 01161) 



UP 



1-303 THEN LET 
535 GO TO 310 
650 
831 

?03 PE" Iaprt) 
IMPBIMRNTE l : 
950 



1-1*1 



NO 

3140 Input "no* da la routine 7 

".Nl 

3145 SAUE N1C0DC I , NO 

3150 GO TO 5110 

2155 

3170 IF flloT" THEN GO TO 3200 

3173 

3173 REM load routina CM 



816: POKE I,B: LI 
1*1. 00 TO 3450 

3994 

3995 REM Routina da nuvigiHi 



50 PRINT "I 
one aeaol r » i " 
6341 PRINT "I 

convirtion ! ! 
> Haxa I" 
5343 PRINT "1 

d 'octets I " 
B346 PRINT "I 

d 'octet* t ■■ 

5345 PRINT »t 

5348 PRINT "I 
. --> Rttour aan 
: R5E 0; "t " 
j 5330 PRINT AT 31,7, " 

6388 INPUT "Enirex voire ckoiji - 

B38B RETURN • 



JO0B RESTORE 3000 

3005 FOR T.l TO 81: READ A POKE 
- "- .33*T,fl: NEXT T 



aen.33*T,A. 
3007 RETURN 




HEBDOGICIEL 27, rue du Gal-FOY 75008 PARIS 




VOUS POUVEZ VOUS ABONNER AU TARIF PREFERENTIEL DE 420 FRANCS POUR 


52 NUMEROS AU LIEU DE 


52x10 = 520 FRANCS. ABONNEMENT POUR 6 MOIS : 220 FRANCS. Pour I'etranger: 


80 F. pour 1 AN 




40 F. oour 6 MOIS. 


NOM : MATERIEL UTILISE : 




PRENOM : CONSOLE : 




AORESSE : PERIPHERIOUES : 




REGLEMENT JOINT: !] CHEQUE DCCP 






MISSION 



Si vousn'dtes pas claustrophobG. pronoz place a bord 
de votre ORIC transformo on sous-marin pour la cir- 
constanco aim de debusquer ot de lorpiller lo mechanl 
petrolier japorwus 

Suite duN° 66 



ORIC1/ATMOS 




3220 OH DIR GOTO 3223. 3233-3283, 332 

r*). 3420. 343© 
3223 FOR 1-1 TO 10 
3227 IF SV-K1 THEH 3232 
3230 IF PLMH»\SY-|.^x>-"0" THEN 323 
- 

3233 if pl«n«k8y-|.sx)-"1* then pm 
ntchr*<12) priht"torpllle perdue*. 'u 
011200 returh 

3240 IFPLAHMSV-] ,SX>**P"W0)f8O<"W 
T THEN GOTO 4016 

3243 IFPL»I*< SY~[.SXJ-"E"ANOPRO<-GU 
ITMEHPLftN«<SV-l.SX>--0- E-E-l G0T043 
00 

3247 PRIMTCHRH12) PRINT"08JECTIF K 
ANOUE" UH1T200 RETURN 

3238 NEXT I 

3232 RRINTCHRW 12) PRINTMORPILLE P 
ERDUE" WAIT2O0 RETURN 

3233 FOR 1-1 TO 10 
323? IF SV-U1 OR SX«I>34 THEN GOTO 
32B2 
3260 IF PLRNO<SY-I,SX*I)-"9" THEN 3 

3263 IF PLAN»<SY-I,SX*1 >--l"TMEMPRI 
NTCMR* 12> PRINT-TORPILLE PERDUE-. H 
81T280 RETURN . 

3270 IFPLAN*<SY-I,SX*I>--P"ANDPRO<- 
PCTTMF.NGOT04819 

32?3 IFPLA*MKSY-l.SX*l >-"E"firlOPRO<- y 

guithenpl>»*ksy-i,3x»i >--o"-e-e-i go 

T04309 

3277 PRINTCHR* 12) PRIHT'-OBJECTIF M e 
flrlQUE". W«ir2«) RETURN 

3290 NEXT I 



I ION ■ 



120 II I' >a ru pi RETURN 
3? JO DE-2 

1 13 i' PR0X123 then ;?45 
1948 R( rum 



1 O Vl-K 

Meow 

:m. ki rum 

35*30 REH" 



in -n M-icj cog 



3931 PCM/""'-* NAVIGATION /////'/" 

3932 REM/'/"////////////////////// 

3987 PRINTCWWU2X 

3962 PRIHT"NiM-E.£»3-Ej$,S-0jO»M-0" 

3967 PRIMT'QUELLE DIRECTION". 

3976 Ittf-urw 

3B71 PRIMTCHR4' 12) 

3973 IF R«-"N" THEM DIR-1 GOTQ4O00 

3990 IF R«-"N-E" THEM DIP-2 - GQTO400 



?2W FOR 1-1 TO 18 
7283 ECH-I 

■■■I" II 'f'l ■'! "I- ,..•! 54 IHEM 736 
8 

7213 IF PLAINKSY'I,iXt| ,--l- THEN 7 
480 

.-■■•» I'n 'it* .VI,9X*I -"E"TMEN8000 

7222 IRRU848t8Y*I.SXM »*P-THEH75e8 

7223 NEXT I 

.'.-. ;■ ..urn ,-■..,, 

7230 FOR 1-1 TO 10 

7233 ECH-I 

7240 IF BY41>2I THEN 7360 

7249 IFPIRHW ,■.!.. ■ '{■■THEH7408 

7239 1FPLAM»'SY»I.SX)-'E"THEN0O00 

7232 IF PLAN* SY* I ■ SX )--p" IHEH7388 

7299 NEXT I 

7237 GOTO 7360 

7260 FOR I-I TO 10 

7263 ECM-I 

7278 IF SY*I>21 OR BX-KI THEM 7360 

7273 IF PLAWSYM.SZ-I i- "I" THEM 7 



DRHUIHF' j- E','1 ■ ». I I IFPLJ ..»■ 

■ II - . ■.. 

46/.-. '<-«HAuT.i«GO 



RflJQ nil- IB/ECU i '- ! BMIH1 Q i . i. ■ 



0, i 

■ ■■■■' mi ie/ECH^l DRmuinT'T. 
ECH... INT", "H -. I 

0230 DRAUJMT'VECH).0,1 DRMUIHI'IU- 
ECM>. mi' 1 ; ECU'. I 

0260 WMHINTI -lO-ECH/.INI'.lO'ECH).! 

9278 RETURN 

9400 CURSET140,90.l DR0U3 l.U.I CUM 
.... 

9410 OR(lHINT'-:!0/ECH',0.1 DFHMINI'- 
5. ECH i. IHTI ]5-ECH-,l 

8420 DRFHJINT'20'ECH'.g. J DftflUlHTfSV 
ECH). ltn'-i8/f;cM.».i 

5448 DRAMIHT<9/ECH).1HT<9/ECH>.I DP 

Willi' 10/ECH>,0, 1 

. I' -■ I kdllJU' ' hit/. INT.' -,- F-i.H/, ] (., 

RAWINT' -20'ECH >, 0, 1 DP0UIHT< 20'ECH )- 



VJ649000 RETURN 

■ ■ 
MGOTO46670 

i '->46723 
46900 RE" 

45818 REfV"" PLUS D'OKYCfNI 

46913 HIRES TEX! PRIMTl 

46820 PRINT PRIN! 

46930 PRINT" VO»/i WJR1EZ C*J RtnaMit* 

. ■ 

E OXVGCME- 

46840 PRIHT-et VOU 
FFES " 

46908 REM--- 90U9-HMtIN M.IP-JIT ■ 



3282 PRINTCHR*' 12 > PRINT "TOPPILLE Pg M2-0 V2-6 GO'5'JB43800 



i'Hl"97'Vl-126 IMP- 



EROOE". UHIT2O0 RETUPM 
3283 FOR I-I TO 10 
3287 IF $X*I>34 THEN GOTO 3312 
3290 IFPL8WKSY.3X*! *--8"THEM33I8 
3293 IFRLWWSY.SX-I J--l"THEMPPlN(i: 

HR«<12> F-RIMT-TORRILLE PERDUE", WAIT 

2O0 RETURN 
3380 IFPLFiHKSY.SX*! y-'P-HMDPRO<-PE 

: [HGHGOl Q4O10 
}'^3 [FPUM9<SY.m»l N-g-ftHOMO »0y 

ITHEf*-LMtn/ v/.' ; .:> | -"0- E-E-l GrjTQ-»3 



4083 «*-DIR«'DIft^HI-57 vi-126 IMP- 
1 . H2-8 V2-8 GOSUB43O00 
4008 RETURN 
4018 REM///////////////-///-'/-'////" 

4813 REM///// PETROUEP TOUCHE //•/ 

4028 REM/////////////////////////// 



4038 HIRES'TEXT 

4832 MJJS-l 

4833 PRINTCMROt 12^ PRINT PRIHT PRIII 
RINT-OejeCTW M T PRIMT^ 



PHCKJE-. Mftir200 RETiJRN 

39ie MEXI I 

3312 PRIMH.HR*'!,;> PRPH - TURPILLE 
EPWJE*. WHIT200 RETURN 
OH I-I TO I0 

022 IF SY»I>2I OP >XM/34 THEN 3' 
7 

3"323 IF F*LWI8<SY*I,SX*I >""0" THEN 
39B 

sTM If PLftWiV+I-SZ*!;™-!" THEN 



4040 PRINT" "iCHft«<2?)*"H 
BRflVOM" 
■ 4838 PRHfT* "*CHR9<27J)"N 

epfivo ' • " 

4033 PRINT PRINT 
; 4060 DHTR6-6.8.I8.I 

6,3,3-0.6.6.9.18 
) 3,3 

4070 DHTR8,3.3,6,3,3-6.8,6,3-3.6,( 
; 6,3.3.3 

4188 F0RI-1T049 
> 4110 REfiOfl 



4128 U-20 



100 

7288 IF PLRN«''iY*I.5X-I/-"E"rHEII5O0 


7282 IfPLfit»'.SY*I,SX-I >-"P"TH£N7300 

7283 IIEXT I 
7297 GOTO 7368 
7290 FOR 1-1 TO 18 
7293 ECH-I 

7380 IF SX-J'.l THEM 7360 

7303 IF PL»I»<SY,SX-I>"t" THEN 748 

7318 IFPLRN»<SY.3X-I>»"E*THEN8000 
7312 IFPLMN* f .SY.'X-I )-"P"TNEN7300 
rjS13 NEXT I 
7917 GOTO 7368 
?328 FOR I-I TO 10 
.'323 Er.H- 1 

7350 IF 8Y-K1 Ok- 8X-1 1 them 7368 
73-18 IF PWHt<8y-I'fX-I>*"r IHEM 7 
480 
7343 IF PUil<»' >V I . >>•- 1 ,-"E"THttlfj00 

7347 IfPLflH*(9Y-!,8>{-I)"*P"THlN75«fl 

7330 NtXf 1 

7368 PEM 

7362 REM ■ M 19IH K lh MER /// 

7378 GUR'jE[|40,80,I 

7373 t*flH91.0,l 

7380 RETURN 

7408 REM 

7402 REM///// DCSSIN DE Lfl IERRE " 

7410 CUR%ET140,9e.l 

7413 DRMM91,8.1 

7428 CURSE T 140, /0, ] 

7433 FOR 1-1 TO 21 ST6P2 

7440 OPRWCP< 1 ),r„p< I+l),l 

7430 NEXT I 

7453 RET'JRN 

7308 REM 

7302 REM/////// PETROLIER 



. |HT< 1" ECH 



M 

ij46<) DRfinini' 
MUIHTi .»ECM.,0.1 
9470 DPFWIIH- ;■{.< »j. V\l< 13-*ECH>, I 
8400 RETURN 



400^0 REM////. 



40823 FOR F.M-4836Q.VII40 TO 40968 
V1»H0UT '140 STEP 40 
48830 POKEfiM*Hl,EFF 
40040 NEXT FtM 



46910 HIRES rEXl PllIHTCl 

46920 PRINT PRINT PRINT rum 

46930 PPINI-I '(.'.'.i.iRrfiJP 
■rtS Pf* U" PMHT'POHD." "■H" 

46940 PRINfVOTW I 
»CE DE Lfl" 

46930 PpIMT'HnVlCWTIOH MMRIlIMt H «. 
////// OUTEE L* VU 

46960 PRINI-Dt 27 I«W i HI 

m LH CAUSI ■ 

i.. • i. PJ llf] | : i;. ..h, - 

46980 PRIH1 PRIHT PRIH1 

46990 Gf TR8 GOTl ■ ■ 

4 9Q0 Rl M 0) -■ /s/s's// 



43883 REM////. 

IV HI HJl^. /'///--////////////////// 

43812 CUR5ETHt,V1.3 
43013 FOR 1-1 TO LF_N< M) 
43816 r.ODE-N?.','Mir,*<Ht.I,l )> 
43017 IF COOE<32 OR C00EM2? THEN 4 
3020 

.;■;.;! ; f Hl«kr.ii|.| ..1, IMC 

4-5019 CURM0VH2.V2.3 
43020 NEXT I 
49030 RETURN 
43100 REM///- 



43110 REM///// PLUS DE CWBURflHT . 



■II ii IV) .nil . t n r.4.| II .1 l-RIHTCHRf 

12> 

,|i'»..>i I'RIII! '-PINT 
.!'■ M.'l f'k'INT" <H»X, VtUt; M 
ntjtR M'J FOND" 
49040 PRINI'll I R NER.. 
49030 PRINT PRIHT" R flXLFtlt FHlRt 
K\ rr nrrrttj n Lft " 
49860 PPIMT-F'ROFONDE'JP...- 
(8070 PR1H1 (CHIT i.l.TF-4 r,f,iO',i)iJOH 
49800 REM'///// 



49010 REM'. 



PI ii | DC IURP1LLES - 



43138 HI-93 71-136 EFF-1 HWr-6 COS 
43148 Hl-97 VI-133 EFF-2 MRUT-6 COS 



3348 IFPLflM»'SV'l.SX*I .--ffni^PPO" 
CKJITHENPLMI*' 0V+1 -8K*I .-'■0" E-E-l GO 
T04300 

3343 PRIMTCHR*' 12' PR MIT "08 JEC r IF H 
PNOlJE*. WRIT20O RETURN 

3333 NEXT I 

3337 PRINTCHRf \Zi PRINT "TClRPILLE P 
CROIJE"- MRIT280 RETURN 

3960 FOP I-I TO 10 

3362 IF 8V*1>2] THEN GOTO 3307 

3363 IF PUV«K8V4'1/9X>"8 H THEN GOT 
3383 

3378 IF PLF««'SY*I.SX>-"r' THE>I GOT 
3387 

3373 IF PUMKSY+I'SXX'F" HMD PRO' 
-PET THEM GOTO 4010 



4138 |Fft-0THEIIW-23 GOTO4130 
4148 IHJSIC1. 3. 8.0PLflYl. 0,1.473 
4130 MftlTM 
4160 l€XT 
4170 PLff/B. 0.8.0 
4180 PRINTPPIHT 

4190 PRIHT" Co»*i*nd*nt voiji v*n*2 
■it r#c*voir" 
4192 PRINT" !•• P*tlelttttoni <*l P«i 

t490IM>" 

4194 PRINT" V«ii «w4I •ritl«r«"«nt 
rvnPll votr»" 

*J2S SlUy'^KiSI;"..™ *»t« -RPftW. /ECH).8.|.0»IM8.IHT<-VECH>.1 

419ft PPINf Erwor* urnf foil BRHVO 76M wwwiMT' 13/ECMJ.8. I DRFIWINT<3, 



7384 C-DIR-PDP 
7303 IFECH/1THENF_CN-ELH'<; 
7310 IFPes<C'-4IMEN7800 
7320 IFC-0TMEN7300 
7330 CURSET140,80,1 
7340 DRAU91.0,! 
7330 C'JRSEri83,80.3 
7360 DP0MINT<-32/ECH),0,l 
7370 DRAMINT' -0yflCH>, IMK-13/ECH), I 
7380 DPflUINT'3/ECH).0.1 ' DPMW0, IHT( - 
3/ECHJ.l DRF*<INI(30/E'.MJ,0.1 
7390 DRHW0. INT<-3/ECH,,l DRHWINK-S 



I PRINT" Pour 



r»»»rcl«r 1* 



420O 
proildmt' 

4218 PRIMT-R006EVELT v 
3388 IFPL8NO*'SY*I,^/y- , 'E"»C'PP0':-0iJ rvww-rr" 
ITMEHPLF«WSY*I,SX>-"0- E-E-I G0T043 4220 PRINT" -;CMRf<27: 

9 3302 PRIMTCHPfUy PRINT-oejECTIF M 4238 PRIHT -PRIHT GETPt GOTO60OO0 
MWJE-, MFHT200 RETiJRN 4300 PEM////// ESCOPTEUR C0«XE / 

i393 NEXT I // 

3387 PRINTCHRV 12. PRINT"TORPILL£ P 431" f ; fl MM PR IN OJIR*' \.l> PRIHT "ES 
ERf>JE"- UHIT200 RETURN f.ORTEiJR COOtl COMMMNDWIT 

3398 FOR 1-1 TO 10 FTURN 

3392 IF SYtI/2l OR SX-I'l THEN 3417 7000 REM 

— ~" THEN G 7O|0 REM'- •- //' PERISCOPE 



-Pi Rnlrtl, 



WHIT308 I 



,1 

7618 DRFiU0,INr(23/ECH),l .DRfiwINT'3/ 
ECH), 0,1 'WWMO.IHK 13/ECM*. I 

7620 RETURN 

7800 CURSET140,B0.1 DRFIM91-0.1 CURS 
ETI83.80.3 

7818 DRf*IINT<-23/ECM>,8-lDPftMIHT':- 
10/EGH).IMT(-10/ECH>.1 

7920 DRflUIMTdS/ECH), IMT< -6/ECH >, I ' 
DRRM0.IMT<-ll/ECtO,l-DRNWINT' I3/ECH> 
.1 



3393 IF PLr»»/SY*I.SX-I>' 
OTO 341? 
3400 IF rl*N9X8Y4'I,8X-I> 

OTO 3417 

3403 IF PLHMVSYM.SX-I/' 
CK-PET THEN GOTO 4018 



THEH G 7820 REM 

7823 IF PPU/3 THEN PR I NT* VOW ETM 

0MD PR rpop PROFOHf/'. UR1T388 (8C*0 RETijpn 
7038 IF JPJC-1 THEH " 
RETURN 
3418 IFPL8N»'SY*I.SX-I/-"E"8HW > P0<- .-(j,^ IF IS',-0 fHEM ISG-I RET'JRM 
0«JI THE>»LPN*' 8Y* I - •*■ I >-"$" E-E-l CO 7833 REM/// 

T 3412 PRIHTCHPf 12 v PRIHT "06 JECTIF H ^036 frt-" " 

»«"J€". HF1IT2O0 PETURH 7840 F0RI-IT0I3 

3413 HEXT I 7045 B9-fl8*«HWC 127 

3417 PPIHTCHR»<I2) PRINT"TORPILL£ P 703O NEXT 

ERf>JE". MRIT280RETUPH 7835 M"HIW»-i' 

3420 FOP 1-1 TO 18 70S0 FOPJ-UOIO 

3422 IF SX-K1 THEM 3447 ?WQ HI-141 Vl-13*< 

3423 IF PL8H«'SY.!5X-I>-"0" THEN GOT Vl ,-f GOSIJB4380O 



3443 

3438 IF PLRMO<S' 
3447 

3433 IF PU»»<SY.3X-I;-"P 
-PET THEH GOTO 40 10 

3440 1FPLRN«<3Y.S>:-1 



7880 NEXT 

SX-IJ--1" THEM GOT /oso If ISC-0 THEN RETURN 

7180 ON DIP GOTO 7110.7140.7W0.728 
PM> PRO'' 0,7230. 7^60. ,'2'>«3./320 

7118 FOR I"l TO 10 

., 'E-WOPR.0O0U 7113 ECH-I 

1TWHPLBMVSY.SX-I/--8- E-E-l C0T048 ?) 20 IF SY-I'I THEN 7360 

ii 7123 IF PLWHKSY-I.SX)-" 

3442 PRINTCHP»<12i PRIHT'-OBJECTIF M mt ^ ait 

HMOUE". U8IT2O0 ■ RETURN 7130 IF PL««<3--- 

^443 HEX? 1 713Z IFRLRHOfSY-I 

3447 PRtHTCH*»<12> PRIMT"TORPILLE P 7iVj NEXT I 

ERTXJE". HP1T280 RETIJRN 7137 GOTO 7368 

3438 FOR 1-1 TO 10 _ 7140 FOP 1-1 TO 1 

-■432 IF SY-I'l OP SY-I/34 THEM GOTO 7143 ECH-I 

3433 IF PLf»«<3Y-l,SX-I>--0" THEN G 7133 IF PLHH* SY-I.SX*! *— 
OTD 3473 400 

3468 IF PU»*KSY-1,SX-I>-"I" THEN G ? i60 IFPL»HVS 

OTO 3477 7162 IFPLfttWS 

3463 IF PLHN*;SY-I.SX-0--P" »* RR 7163 HEXT I 

O'-PET THEN GOTO 4010 7167 GOTO 7360 

3470 IFPLHH»'VC-I.SX-I>--E"»«PRO<- 7I70FOR I-I TO 10 

OUITMEMPLFt«<SY-I.SX-I>--B"'E-£-l CO 7173 ECH-I „-„,,«, 

TTi4-^0 7100 IF SX*I'54 THEM 7360 

3472 PRINTCHR«I2, PRIHT-08JECTIF H 7 I83 IFPL»»' SY.SXM /-- I" JHEH740O 

MI*UE"..HHIT20O RETURN 7|90 IFRL»W SY, SX. I y-"E THEMdWO 

3475 )CXT I 7192 IFPLHM#<$Y,SX'!>-"P"TrCH730e 

3477 PRIMTCMRV 12' PRINI" fORCILLE P 7155 MEXT I 

CRMJE-- HflIT280 RETURN 71J7 GOTO 7360 _^^_ 



7830 DR8W0.INT<-3/ECH>,I DPOUINK-I 
0/ECH >-0, 1 - ORHU0, IHT< -3/ECH >, 1 

7840 DRPWIHT<38/ECH).0.1 DPFlWO.INM 
3/EGH i, 1 ■ DRRUIHTX - I0/ECH >, 0. 1 

7830 DR«W0.IHT(3/ECH>-I DPhUIMT< 13/ 
ECH), 0,1 DRBMO, INT< 1 1 -"ECH > , 1 
„ 7968 DRfiMniT'l3/EGH).IHT(6/ECH).rO 
G0SU6 7033 pmiIMTC-I 0/ECH >,1HT(10''ECH>,1 

7870 RETiJRN 

79O0 CURSE 1140,00,1 DRnu9l. 0.1 CURS 
ETI93.80,3 

7910 DRFtMIHT';»25/ECH).0.1 DRF*IINT'- 
10/ECH>.IHT<-l0/ECH).l'ORr»4INT'28/EC 
H>-0.1 

7928 DRHWO, INK-IO/ECH),! DRPWP'T'5 
/ECH>.0. l-DRfiMO,IHT<~3/ECH>,l 

7930 DRRUINT(20/ECH;,8,I ■DRHUO, [MT< 
9/CCH>< I DPrWlNT< 3/ECH). 8,1 

7948 DRhWO, IHT< 10/ECH).lDRf>WINI^8 
/ECH), 0,1 Wr)HIHT<-l0/ECH>,INT<: 18'EC 



43130 PETURH 

43170 HIRE'. IEXT f'RINH,HR«(I2) 
45180 PRIHT PRINT" COHHfiMNi'i | n ffl 
UDPft hTTEMORE LES" 

■IM-.O PRUIT-vLCWVS' ' •'■ 

45280 PRINT ■PPINT" V0U9 RVEZ UIILIS 
E TOUT VOTRE " 

•13210 PRIMT"CfiPfcURfiNT..,.ET LE PETR 
OLIER EST PHRTIVERS SH DESTItCE HHFt 
LE.. 



46010 HIRfjJ 'EXT PRIHTCHRJK12) 
46013 EXPLODE 
46020 PRINT l-PIMI 

46038 PPINF" ADIEU CUtlMMMDRMT " 

4^040 PRINT "IH>IJS V'HJS RE^EITERONS 

rou*. . . " 

46030 PP1IIT F'Pliir-' VOUS ■'(Mi. ECH 
OOER votre iinvii/E" PRIHT'SUR LH COTB 

'46O60 PRINT* IL H'V m BUCUH BUHVIVRN 

T < I )" 
4607O PPIIIf PRINT PR I II I" I VOU "■' 

IEZ Fftll Fir K.Pir IOH Mil" 
46000 PRINT PRINT GETP»GOTO600O0 
46200 PEM/'/ EPEPOHHGE DU PETROLIER 

46210 KXPLODC-HIRES mWI 

■)(..-.(! F-RINI(,HRV 12. I'RINI PRINT 

46230 PRINT" 6EPIE2 VOiJS KAMIKAZE ' 

46740 PRINT" VOUS AVE2 DEIRUJI II P 
ETROLIEP EN" 

46230 PRIHT "E'EPERONHNT [" 

46260 PRIHT" JE PEH'.C 'iJi C'fjfl IHV 
01 fiNIfllRE 71" 

46278 PRIHT" QUO I CriJ' IL EN B01T»V0U 
S IIVI ,' REUSSI" 

46288 PR]NT"VOr»E MISaiUN.MAIS VOUS 

ETE6 MOPT i r' 

46290 PRINT PRINT 6E IP« ' COIO60000 

4640« RF.H" FF-FRO,ifH,l IT I |',n;,RIHI 



49820 Ri " '/'////////////////////'/ 

49030 HIM 
49040 TEXT 
498S8 PHF-ER4 IMK7 

49060 PRINT PRIN1 PPIHI PRINT 
49070 PRINT" v&u» *«#x »»*nqu» votr* 
ml»*lon- c*l«" 

49<J73 PRIHT-wou* lout* votr* Fl*c» 
d» conntnUtnt " 
49080 PRlNT>n »ff«t I* Pttrolltr • 

49883 PRIHT-bOft Port." 

i 1090 i "Uir print 

49093 R-INTPNDC I -13"I 
49180 OH A GOTO 49101,49102-49103.4 
9104.49103 

49101 «t-"M»uUn»nt •i* v«u»ftu' 
0TO49118 

49102 M-"c*Plt«in»" GOTO49I10 

49103 0t-"l»veiir <« Pont" COT049I 10 

49184 fi»--»u<rti«r-«Jltr»" G0T049H 



49103 H»«-|»r mUn 
49110 PPIMT" Votii 

1* coir 
49120 PRIHT"««rt 

,04 



Voo» ilfir*; " 



IMP-0 H2-6 



THEN 740 



1 THEN ? 



|>,I 



8010 C-DIR-PDR 

8020 IFECH>ITHEI€CM-ECH/2 

8830 lFreS(C)-4THEH820O 

8040 IFC-OrM€N8400 

8058 CURSETI48,90.1 DPHW91.0.1 CURS 
ETI83,8e,3 

8060 DPftUINT<-30'ECH'.iJ,l DRHMINh- 
10/ECH ).'INT< -13/ECH>, 1 ■ DRRWINK 18'EC 

8678 DRAM0,IHK-3/£CH).l DRHMINf'-'; 
'ECH),0. 1 DROHIHTi 10/ECH). 0,1 

0088 DPfiMINr'5/Er.H<,INT<5/ECM>.l DB 
HWlHTf I5'ECM).0.1 

0090 DRHU0, INT' -3/ECH), I'DRAMIMTO' 



I.SX*I>-"E"THEH8000 

T cv t k«-R H TMCH7300 t' M),0, 1 

l,9X i)- r .r»n ^~ ^^ Wf|UB||HT ,. VECH>i , DRAWIHTCW 

'ECM-.8. 1 DPFiW0.IHr'.3'E'.M), I 
8110 DRf*IIHT<3'ECIO.0.1 DRHUO, INT' 1 

H'FCII.. 1 MRI-WIIir' 10'ECH), 0-1 
9120 DRAMINT'-3'ECH;,INT< I9'ECH).1 
8130 PETURH 
8200 CURSE 'f 140. 80.1 DPHU')l,y.l CUM 

9210'dRhUINT'-23'ECH>,0,1 DRItWINT' - 
10/ECM-, INT'-10'ECH J , I 



R/ 

4641M I.: J M MM MIl-'l ', II ?.1 
46420 PRIIirCHP*' 17. PRINT PRINT 
46430 PRINT" VOUS AVEZ EPEROHE UN D 

E3 EJCORTCUM" 
46440 PRINT" PF* CMFtNCE TOljS LES ME 

M8RES DE" 
46438 PRINT" L'EOUIPAGE SUNT SHINS 

ET SAUF." 
46460 PRIHT-'MW-HEUREUSEHEHT VOUS AV 

EZ ETE PRIS " 
46470 PRINT'PMR LES J0PWIAIS. . . . " 
46488 PR INT "VOUS FINIRE2 LH GUERRE 

DANS UN BAGHt. PRE', DE S1NGHCIXJR COfl 

MAHDAHT.." 
464^0 PRINT PPINI GETR* GOI'y,WW0 
46600 REM/// PASSAGE SOUS ESCORTEUR 

46628 HI-92VI-197EFF-1 HAUT-IOGO 



46630 MI-93VI-187-EFF-I2 MhUF-lB G 

OSUO400O . #- 

46640 PRINTCHRV 12) PRINT" -jCHRW^ 

7);"A".CHR«27)i"LDANGER '" 
46630 EXPLODE ■ PRIHT-L ' ESCORTEUR »OJ 
S 'GRENADE' "» -MAI r300'PRIHT-PRINTCH» 

K12) 

46633 REPEAT 

A4j.ni xvwu\,\ '.i.ii-iiiF, i-i*-' i -tui-'i 

46688 ir',iii-5rirtiNGOTO46980 

.U,./.l) i-Riiir-wi mi -m"'. '"■"'- ' - "• 
-KEY* 

46693 UA1T200 



49125 PRINTPPIHT 
49130 PRINT" On r* 9»tl 
tori- It I** Ml" 

,i-,i.i» r.i ii'* (.MI 060888 

38000 REM////////////////////////// 

30010 REM//// DESSIN DU DECOR • 

50020 PEM/' 

30030 HIRES 
50040 INJX2 

50030 F'RINTCHP«12) 

50032 PRIIIT"V0U3 DECOUVREZ ACTUELU 
MEN! LE TflDLEFlUDE 80RD DU " - ~- 

50060 FORI— PI TO PI STEP . 

5O870 CijRSE T38 + I CD*-/ I i%'1~. ), 133" •,!)' 
( I )*42),1 

50000 NEXT I 

5O09O CURSE 1 38. 133,1 

30IOB DRFim.0,1 

58102 DRAM-1.0, I 

50104 DPAN0.-2.1 
30106 DRAU0.4.I 
50100 DRAH0.-2-1 
5011O DRAW- 1.0.1 
50113 CURSE123. 123-1 
*iOII0 DRHM3.6.1-DRAM-3.-6.I 
30120 DRAU30.0.1 

50122 DPAM-3-6.1 DRAU3.-6.1 

50123 DP0W8.60.1 
50128 DRAU-3,-6.1 DPI443.6.1 
30130 DRAU-30.0.1 

30132 DRAW3.-6.1 DPFfU-5,6.1 
981 r. I/RAU0,-6O.l 
58140 CUR6ET30, ID, I 
50145 DPAHO.6,1 
3OI30 CURSETB4, 133.1 

30133 DPAH-3,0.1 
90160 CURSET30.196.1 

501 05 IAT4I". f ■ 
5OI70 CURMT19.133- I 
B8179 DRAU9.0- i 
-,>,r-ii > lit- .ii.- ii- i 
30189 DRAH4 , 4 . 1 ■ DPf*l 1,-4,1 
30 IW DRftUt 0.0.1 
58195 I/RHH0.4.1 DR0WO.-4-I 
30200 DRAWIO.O. 1 
39203 DRNH-4.4.I DRIU-M . - 4 . I 
5021U DRMUO. 10.1 
50213 DRAW-4,0. 1 
50220 DRAUO, 10. I 
58225 DRAN-4, 4.1 DR0M4.4,! 
50238 DROH-lO.O.l 
50233 DRAM0.-4.1 DRAW0.4. I 
50240 DPAM-10.0. 1 
•S0745 DRMU4.-4.1 ■DRMM-4.4.1 
50230 DR8M0.-IO.1 
30233 DRHM4.0. l'r*R0H-4.H. I 



'Unix )■:>'!» : f l 



MEANDRES 



Ou comment joindre deux points par le moyen le plus 
sinueux... 

Etienne JACQUES 

Mode d'emptoi: 

Jeu de reflexion pour deux joueurs utilisant le crayon optique (style 

taquin). La regie du jeu est dans le programme. 

Ce programme destine a un T07 + 16K peut etre adapte a une 

momdre capaote mOmoire en suppnmant les REM inutiles. 



THOMSON 



>& 



ERRATUM sur TO 7 
ISABELLE ET DRAGON du n a 
64 

Sincerement navre pour les pos- 
sesseurs de T07, en effet. la 
seduisante princesse et le me- 
chant dragon de la premiere 
partie (28010 et 28510) doivent 
reapparaftre a la fin du jeu 
(21750 6121760). 



Vous devrez vous passer 
leur presence en tapant 

lignes suivantes: 



: ? 5e 


IF 


°N\ 


2 THE 


M PRINT" 


. .11 




pas 


WO 


I deu* 


Pierres 






se 


tres'nU ' 


' ' -:COTO370 


1755 


PRINT" 


Vous 


eucz uo 


pi 


dragon 


:er 


-i ri« 


;*enfuit 




1500: ME 


:" 








1769 


LL: 












- ■ - - 



: ' ;vr 70" »■■«■: t'!l«uon 16 

10 XEfWt. .-::.:•. 

■ :;■■?:* ■ PSESEHTflTrot) 

. . /■:■: • MTAS 

-.0003 ■ CEGLE WJ JEU 
:?0* ■ DONNES. DESSIN 

:;;.": 38488 '.JEU 



■-'-.- 



POUNCES M DEPART - — 

, 1,2,2,4,24, 2E41DEFGRI 



.it? C»EFGR«<»>-1, 

; 4.4.3.=. :. :.i 
:eie e-efgp»- i -=7, 2*. 32. 6*. s*. 129. 123, 12s 

l&EFGR*<2>-128, 128, 123,64,64,32,24,7 

, ..... ftTTRB . _ t!L0CATE : ,;, 

1038 fif-GRI 2>«-CR**B>iBt-6R*<l>*GR*<3> 

154e COLOR 4.^!PPINTGRf<e>• *;A«;- •;* 



1959 LOCATE 1.4.0 

(964 print" ibs] 
:-t£ 1,6,8 

1938 PRINT" *;ai;- 

:098 locate i,e,6 

1180 PRIHTGRt<3>:* 

::as locate 1.10,0 

: 110 PR1NTGR*' 9>J" 



:GRi< i I 
;GR«<2> 



1. 12.3 
•;B*:- 



;GRt<3>; 



: 140 LOCOTE 1,14,0 

•150 PPINT- •:*$;- -;««;■ -;CI 

1169 LOCATE 1.16,0 

1170 PP.INTGR«<3);" -;B»;" m ;B 
1J99 LOCATE I, 19,0 

1198 PRIntgpi' e:; " ":a*;" ■;<*; 

1208 LOCATE :,20.3 

1210 PRINT- -;8*;* -;B*;" ";GI 

1228 ' 

1250 TOP 1-3 TO 133 STEP 32 

1269 LINEC3,!>->:i64,I>,-5 

1278 LINE(I,3)-U,168),4 

1280 NEXT I 

1290 COLOR .2SATTP3 1,]: RETURN 

1997 ' 

19 r " 



PRESENTATION ■ 



1999 ' 

2380 ATTP8 1,1: LOCATE 5. 10:PPIHJ- JEU DES 

-1EAN0RES" 
2319 LINE<4,H.--<37, 11>-=",1 
2929 COLOR 7:ATTRB 9,0:LOCATE 12, I4:PP[N 
r-«ut«ur : E.JACOUES • 
2339 COLOR 4IL0CATE 4,28,8iPRINT"hPPUYE2 

SUR ";s COLOR 0.3! PPINT "ENTREE";: COLOR 4 
.3:PPINT- POUR COnrtENCER" 

2349 I*=INPUT»'I ■: XT If = CHPKJ3> THEN CL 
;:RETUPN ELSE 2043 
2997 ' 
2993 • ___ &ATAS 



3099 ['AT*. 1,2, 1,2,1 
3318 DATA 2.1,2.1,2 
3028 &ATA 1.2.9,2, 1 
3838 DaTA 2. I. a. 1.2 
3040 DATA 1.2,1,2,1 
3353 FOR J»I TO 5 
3360 FOR 1=1 TO 5 
3070 PE»I' :: T6' I, J> = Z 
3330 NEXTiNEXT 
3390 RETURN 
13980 » 

10881 ■-— PEGLES DU JEU - — 
13002 ■ 

13018 COLOR 3.4:«TTE& Ijl (LOCATE 4,3:PPI 
NT-JEU DES l-IEANDRES'' 

10820 mTTRB 9.0;PPINT:PRINT:CQLOP 4,8 
18030 PRINT" Ce Jtu se joue fur un daoi 
er 5x3, 'tPRXHT 

13040 PPINT" Chatiue joueur fa:t ]lt»«r 
k\ terns t r-j*»e«t un jeton ou 
rjri* ligne ou une colonne de deux, troi 
t ou quatresjetons <«rs la case uide.~ 
19850 PPINT*P->u>- cela, !l suf^it d'apuuy 
en le cnaaonoptHiue sur la case a partjr 
de la^uelleon ->eu* fair-2 9lirser les je 
tons." 

18068 PRINT:PPINT" Le jeu se pursuit J 
us^u'a ce qu'im joueur gagne en for*ian 
t un dessin dans lenuel au noins trois 
jetons forwent una ligne continue joi 

9narit deuy cotes" 
19070 PRINT" (opposes ou aa,acentsJ du da 

10330 LOCATE 4,£3:PRINT-APPUVE2 SUR 't'-C 
OLOR 8,3:PRINT-ENTREE";:C0L0P 4,0:PRINT- 

POUP CONTIMUEP- 
13990 A«=INPUT»a> 

13130 IF f»*<>eHR*CI31 THEN 10890 ELSE CL 
S: RETURN 

30399 ' 

30400 ' 

JEU 

30401 ' 

30410 0=0+l+e»tO=S.'tLOC**TE 22, 5:PRINT- JO 

UEUP";0 

39415 INPUTPEH A,8 

39428 X = <!A-16>S32*i:Y-(B-8>333*I 

39438 IF X<1 OR X>5 OR Y<1 OR Y>5 THEN38 

419 

30440 IF Y=YK THEN 39446 ELSE 30445 

39445 IF X-XK THEN 31908 ELSE 8EEP! 

GOTO 39415 
33446 A«ft8S(X-WCJ;BBSGN<X-XK) 
38447 IF 01=0 THEN 39477 ELSE X"XK*B 
39459 IF P0INT'<X-1>«32*23,'Y-1 .>a32 + 9>=4 

THEN GOSUB 31599 ELSE G03U8 31688 
39^70 XK=X:0I=D1*1 
30475 GOTO 39447 
38477 LOCATE CX-1 >§4+l, (Y-l )«4*2jPRINT' 

-: LOCATE (X-I;»4+I,':v-lie4 + 4,0:PRINT* 
"JT8CX,YJ=9 

39430 GOSUB 1250:OI-0fGOTO 35088 
38500 T6'-XK,YK> = 1 
30519 LOCATE (XK-1 >M*1 , (YK-I )«4*2:PPINT 

GPS<8>i- ":L0CATE 'XK-1 )*4+l, (YK-1 )t4*4 
iPRINT - -!GR*<1> 
30528 RETURN 



30609 TB(XK/YK>*2 

30610 LOCATE 'XK-I H4+1. (YK-1 >t4t2:PRINT 
!" -;GRIC2>:L0CATE (XK-1)»4*1,<YK-1)»4.4 
:PRINTCR»<3>;* ' 

30628 RETURN 

31808 A=ABS(Y-YK>:e=SGN(Y-YK> 

31447 IF OI=A THEN 30477 ELSE Y=YK*8 

31458 IF P0INT<<X-1>»32*23,<Y-] )»32*9>-4 

THEN GOSUB 31538 ELSE GOSUB 31600 
31479 YK=Y:DI=DI*I 
31475 GOTO 31447 
31477 LOCATE (X-I >»4*i , c Y-l >«4»2:PPlNT - 

" iLOCATE CX-l)i4*I,<Y-l)e4*4,0:PRINT- 
■:T8(X,Y)»0 

31490 GOSUB 1250:[>I = 8:GOTO 39410 
31500 LOCATE CXK-t>t4*[,<YK-I>*4+2;PRINT 

GRfCB);- ":L0CATE (XK-1>«4*1,<YK-1 JM+4 
:PRINT- a ;G8f<l) 
31565 T6fXK.YK)=l 
31510 RETURN 

3L600 LOCATE 'XK-1>*4*I, <YK-I >«4+2tRRIMT 
;- ";GRf ^.'JLOCATE (XK-I)«4*I, <YK-l)R4t4 
:PRINTGR«C3>f " " 
31605 TB'.XK.YK>=2 
31618 RETURN 
3499S ' 

34999 ' GAIN £>E LA PARTIE 7 

35000 ' 

35919 8=1 

35920 A=i:IF 8=6 THEN B=l ELSE GOSUB 359 
"9JGOT0 35820 

75933 A=5:IF 8«6 THEN A=2 ELSE GOSUB 350 

70iCOTO 35030 

35049 8=1! IF A>5 THEN A-2 ELSE GOSUB 358 

70:GOTO 35040 

35850 8=5! IF A=5 THEN A=2 ELSE GOSUB 350 

70:GOTO 35858 

35360 GOTO 33410 

35065 ' 

35079 IF TB(A.B>=0 THEN 35075 ELSE 35088 

35875 A=A-i:B"B*1:R£TURN 

35888 IF A<> 1 AND A<>« AND BO 1 AND BO 5 

THEN 35075 
35090 IF <A=B AND <A=1 OR A*5) AND TB(«, 
B'ol> OR <A»B=6 AND (A=I OR A=5) AND TB( 
A,B)=2^ THEN 35375 

35180 IF A-l AND TB( A, B*(TB( A, B ) - I )-(TB( 
A,B)"2>>OTB<A,9> THEN 35075 
35110 IF A-5 AND TBCO, B-< TB< A, B >" 1 ) »<TB( 
A,B)«2>K>TB<A,B) THEN 35075 
35128 IF B=l AND TBf A*(TB< A,8>»1 )-<TB( A, 
B)«2>.BK>T8CA,B) THEN 35075 
35130 IF B-5 AND TB-.A-(TB<A.8> = 1 )*<TBCA. 
B>"2),B)OTB(A,B? THEN 35875 
33148 X«A:Y-B 

35145 DP=0-<A»I>-2»(B»I)-3t<A-5)-4<(B»5> 
35150 ON TB(X.Y) GOTO 35208,35300 
35200 IF A*B=6 AND (A=l OR A-5J THEN 368 
00 

35218 ON DP GOSUB 35400,35418,35429,3543 


35220 IF <X=0 AND AOi) OR (X-6 AND A<>5 
) OR (Y-0 AND BOD OR (Y = 6 AND B05) TH 
EN 35580 

35230 IF X»0 OR X=6 OR Y=0 OP Y=6 THEN 3 
5975 

35240 IF TBCX,Y>«0 THEN 35875 
35250 GOTO 35138 



35320 IF <X-8 AND (KM) OR <X-6 AND A<>5 

■■ OR <Y=0 AND SOD OR <Y»6 AND B<>3-> TH 

EN 35580 

35330 IF X"0 OR X»6 OR Y«8 OR Y«6 THEN 3 

5875 

35340 IF TB<X,Y>«0 THEN 33075 

35350 GOTO 35150 

35400 Y-Y-i:DR-4:RETURN 

35418 X=X-i:DR=3:PETURN 

35420 Y-Y*UDR-2l RETURN 

33430 X»X.l:t)R-l!RETURN 

35497 ' 

35498 '— PARTIE CaGNEE — 

35499 ' 

35500 CLSiSCSEEN .0:ATTRB 1,1 ILOCATE 6,3 
:PRINT-JOUEUR '10 

35510 COLOR i:PRINT:PRINT:PRINT-VOUS AVE 

Z GAGNE' 

35528 PLAY*A104L12D0REHIFPS0NIL24S0L12LA 

t.FAL24LAbL46SOLl2PDOREn*lFASOflIS005D004SI 

bFAREFAL4BSIb- 

35538 ATTRB 0,0:LOCATE 4,23,0'COLOR 4iRR 

INT'UNE AUTRE PARTIE ? * J i A*- I NPUTs < 1 > 

35540 IF A«»-0" THEN PRIKT'OU I * : EOR 1-1 

TO 580iNEXT:CLSiRUN 30 

35550 CLS:PRJNT- D0NHACE, AU REVOIR...* 

35560 PLAY'OS-iGOSUB 33570:PLAY*O4-: GOSU 

B 35570:PLAY-O3-:GOSUB 353701PLAY-O2" t GO 

SUB 35578!PLAY-01':GOSUB 35570!£ND 

35579 PLAY-A0L6SIStbLALAbS0SObFANlnlbRER 

EbDO'tRETURN 

33997 ' 

35998 ' CAS DES COINS 

35999 ' 

36080 IF A-5 THEN 36840 

36818 DR-HCOSUB 36280 

36020 DR-4SG0SUB 36288 

36030 GOTO 35875 

36040 DR*3: GOSUB 36288 

36058 DR=2i GOSUB 36200 

36060 GOTO 33875 

36200 ON DR G0SU8 35400.354 10,33420,3343 



36210 IF <X>0 AND A' 
> OR (Y-0 AND 8<>1> 
EN 35580 
36220 IF X*0 OR X-6 



OR 



OR ' 



■0 OR Y=6 THEN R 



37000 IF A-5 THEN 37040 

37010 DR-UGOSUB 37288 

37829 DR-2: GOSUB 37280 

37838 GDTO 35075 

37848 DR-3: GOSUB 37208 

37853 DR=4:GOSUB 37288 

37060 GOTO 35875 

37230 ON DR GOSUB 35420,33430,35409.3541 



37219 


IF 




AND 


A 


>] 


OR 




AND A 


El 


) OR 


Y-( 


AND 


BO 


) 


OR 


(Y-l 


.-.'■if. 


B051 


TH 


:.'i ■:.:.,«" 


















37220 


IF 


(-0 


■\K X 


f. 


nR 




DR Y 




ETURN 


















• 



^.W>ffe^. 



TRIDI 4 



T-MttyfrA* . 



CANON 



Dans un cube, tentez d'aligner vos pions avant I'ordi- de la case jouee. L'appuie sur une touche queiconque aiiiche alors 
nateur plus malin que jamais. ,es positions gagnantes un nouvei appuie vous offre la possibility de 

recommencer. 
Cyril GAUTIER Sachez que I'ordinateur met environ 20 secondes pour jouer un 
Mode d-emploi: C0U P- mais <*"'* le i oue ,r6s bien 

Le but du jeu est d'aligner 4 pions dans un cube a. 4 niveaux. sul- A V 

vant les diagonales. veriicales et horizontales. , Ordonnee 

En debut de jeu, I'ordinateur vous demande si vous desirez 
commencer, rfepondez ensuite aux questions Niveau, Abscisse et 
Ordonnee par un chilfre de 1 a 4. /■ Abscisse 

Le niveau 1 est le plus eleve. 
L'abscisse 1 est la plus a droite. 
L'ofdonnefl 1 est la plus en avant. 
En fin de partie. I'ordinateur affiche le gagnant et les coordonnees 

I ' -;■:.:.-,•; -rir CANON '-11/ 18 KOJ 2 °C P'-2!0OTO31O 



CLtAf i'-l H'WII 







NEXTJ 


'6 


10=0 RT-HI 1 , Jl : 0010*00 


noo nexti 




1120 POB1-1I07S!U(1I-FNL 




1130 F0RI-ltO74i IFLI 11-. 




<H-i:ooToi2ooeLseN6xu 


!OOT 


1140 F0«K-lfO*86TEP4 



? '° Q0 T 0140O 730 UOCATEO.OIPHINT'fl »o I . . -IOOSUBI900 "4° IFP-40HP-90HI. It 

, 240 LOCATEo.o:eniNr-A » »., . . -soosusi-oo 740 fobi-ito76:liii-fni.iii -nexti oo 

2so pbint-niv— u*i :008uaiiO!N-K 730 e-o:i-o u;o nemtk 



TI 1490 IFCO-OTHENP9ET IT i 

30SL11 1-1 . 373TIIE 14-9 NEXT I ; 1 F INKCr»- • • 
1000 LOCATEO,0!PI»1«TM 
FNHIHII.J) ii :g-i 
• lNtll.lX'21) 1310 00TO132O 

1400 (.oca/eo,o:print*> 
•i0.23ihen12 1410 1f1nkey*-" themu 



l^OO ' 



I DEFFN»HWJ-V,110,6HNTMV-1I 
1 BES10BE:F0BI-l^t076:RCADHII 
I ; NEXTI 



IQT0230 
:10 K-VAL 
INISTRtll 



:■<■.-; .-ii : .: !■■■ : 



,OObU»JIO.A-K 7a( , F0 B]-1I07A 

:oosub3io:o-k 770 iflii i-4the«iboo 

o:w«-sr««(N)«8TP»{A>. 7eo iFLiit-iarMENs-i 

<"••» 790 1FL(1I-JIHENT-J 

-i:x(cjfi:ooT03oo 799 nekti 

■Olj IOU|*I80SU«1900! e00 1FS<)OIHENBT-6:00101300 

ooiMtunr-T: 00 10320 



:- l .;uii..-,-.nr\.-:; 



il 


0.3ft, 

26,42 
DATAI 


SB. t 1,27, 4 




J2.38, 








4B.S4 










■'■ 


33,37 


3,9,13.17, 

ftl.2,ft, L'J, 
,30,47,4a, 


71,23 


22 


33 
2* 
*3 


37,41, 

30 

3,7,11 


7« 




8.12, 16,20 


.24,2 










0AIA33. 36, 43,40, 




39 




13,10, 



«0D4«1 1-1. I INEXf 410 IFTXEVI'O" 

OIHSM4I0 
34,30,3,19,33,31 470 PniNf-A Dl< 

300 F0R1-II044 

37 aieoo 

310 IFB 
47 HI-6TMEN400EI.OK220 

43 330 FOtJ-1104: IFXII 



LOCAIEO.OIPBIN 



iTHEM310EL3EP 
-'irHEN90EL6EIFrKEri'N-|- 



• '*• i*i:(no 
inn iNExrtraoei 

-2THEN700EL8EH 



II 07ft 

830 11 l"i 11. 1 1 1 1 • ,\r.\ 
840 IFLIIt tlOfHEN08( 

Bso fobj-1 ro4:cj-nu 

S60 tPXICJI-OTHENXK 

TJ 

07o Gorowoo 

800 F0BJ-lTO4!CI- 
EN«EXIJ:OOt0900 



I I BO F0Bl-lTOft4.-XIIl-rHT IX ( II ) : NEXTI 1 

1190 00T02O0O 1730 LINEIX.ri-IX'lS.VI'.LlNI 

1700 B-.123 NE-IX-t3,Y<13i:LINE-IX,V) 

1210 FOBI-KI0K.3 1740 FOBK-0TO'9BrEP-3IFOB7-l 

1220 If I -INT I 1/41.4)1 THENA-JELBEA-l PaifBETIZ.Y-KtaiiNEXTI.K.X 

1730 F0BJ>AT03-ASTEI'3-2*A 1730 BETUBN 

1240 IFXIHIt, J))-STHEHXIKII,JI)-3:0OTOI2 1BO0 - 



131 '.LI 

■K*9StE 



leio f 



■ l> 



270 NEXTI 



, Jl !O0T040O 
73THENB-O!O0T0 



710E1_BESTOP 



ItLINGIX-i.Vtll 



il,]i:li'.nn- 






KIN 






T,J1 I-OTHCN340ELBENC V20 I 



■ iMiuii ts,373riirn9eo 

:/4l»4HTH£NA-ZELtieA-l 

)-A&TEP3-7tA 

III-. I23THGN970 



'BINT-Nlv. : •|HID«II*9,2,1I 
:■!■.■■ ....-,. : -i,-<::,«, i, «,-., i . 
^6,23,20,43,47,39, 3ft, ftl ,38,33,32 390 J"BINT*0r4. : * I HI D* I H6 , 4 , 1 1 | 1 ( 

iTAl, 21 ,41,61,7,22,47,62, 3. 23, 43, A3 »0O LOCA I EO , O : PB IN T ' J. jou* ■(«•■ 
44,64,49,37,23,13,30,38,26,14 MH I Bt 1 I : BT-31 O0T037O 

itA31,39,77, 13,32,40,78, lb, 1,10,33, " > O FO«l- I T01 A! IFX 1 1 I I I M tOIHENHE) 
12,39,36,9,26,43,60, 13,30,47,64 0630 

.TA49, 34, I 9, 4, 33, 38,23,8,37, 47, 27,1 620 RToCjIXIYIJ! >-3:(.OCAT£0,0!PBINl 
6, 31 , 16, I ,22,43,64 >i al -:■■»--. r ;.» , i ..,-,, , f I J i !0OT0370 

OIOftOOELBENEXr I !G0I0I600 
TA1, 49, 32, 4, 13,61,64,16,22,39,23,3 700 CLBl PB I N I - D I - I r* I - voul louftf 



>70 ximi, jm-S:Ht-3:i 

'BO NflKTI 

000 FOBI-I I064:XI t I* 

O10 F0BI-1T07* 

020 Llll-FNLI 1)1 iriN 

030 IFLI1I I7IHEM1O70 

040 irjHJ-1 104: IfXINI 

-.123 



7,11 i:a»vali«ID»ip»,; 

*-3»0*36t I [J, 1 I-31N..' 



F0BI-IT048BTEI>14!A-I 



NCIJ,»I-3THCNA 

-»: j-j.3:ooro2 



1330 LOCATEO,0!PflINT*J< 

FNMlrifS.JII) 2010 

1340 PBINT'NI- ! -IH10-IH6.7, 1) >11 

1330 PBlNT'Ab* ! ■ i " I (;• "i», '.. i , 7070 irmj-ti 

IJAO PBINT-Oril : ■ | HI 09 I B», 4 , 1 I | IO06UB1B -B!OaT020O0 

00 7030 IFFNCIJ>3,-»I-3TMINA 

1370 IFINKEY8---THEN1370 OBOELBKNEXI) 

1380 LOCATED, 0:PBINT'r > a>ltlon-*:aOBUB190 2040 FOHJ-1 T01 • J: IFFNC i J ,- 

1400 PBINr-N-'.'A-*,'0- 
, 1410 F0RJ-iru4:P6-»TB«l 

M70 FORX-IT03!LOCATE24J,K1PRIHH1II)9I»>«, 30tl0 FOR J- I 101 • 3CIEP3 ! B- - B ! C " A ■ Di 1FFHC 

ci-.utii;Nn-c:o0T020B0EL6BNKxij:A--A 

rO70 FoBJ-l>l2tOI>13srCP3:B--Ii!C-A-DiI 
IC1 J,CI-3IHtNA«CELBCNEKIJ, IIOOTMtG 

'Ullli llx IKi J , l > I ■, I Ti.l HIM-Hi i , I II L !il II * 



I FORJ-l •17T01M3! IFFMCI. 



11,11 



PHARAON LEBY 



Ne joupz surtout pas a co jou. vous allez devenir (ou: Mode demploi: 

enferme dans la terrible pyramide du Pharaon Leby Le jeu tourno avec une extension 8 ou 16K0 Lexecut.on du peiii 

vous dev©2 (rouver la sortie en un minimum de temps P r °p famn,e est indispensable car ii reiabii les adresses du vie nor- 

en evitant les multiples piegesqui lalonnent votre che- ma 

min. 

J. Frederic WASTIAUX 

504 PRIHT!H8C9)-«a fc- 

597 PRINTTRS(3)*^ a»- 

see PRiiiTiflB<3)'«» ^, 

3ie printtrbu>-«i fc - 

S13 PRINT"*! PHRRRON LESY * 

""* «: BONUS SECRET' PRINT" («i HRZH 




3^8 PRINT F 



!IMI 



' tl-,..n ,,, 

1 PE»4 URSIlfiuX.ff •) 
1 KWOMMMMMHI 
3 *£«• PHSRRCW LEBV « 
* lOMSWM *■■•■ 



3 S3 0OSU8332 

323 PSIHr-EI VOUS ETE3* PR1NTTHB<2)-B0H PPPUVEZ SUR(Fl)* 
~")_TTRB(6)-r«JVHIS SUR<F5 



■ DM H9M 

9 Tx-e >a-« tx-8 3-8 tp«b f 

10 rt*lMT(SNB(l)«4>.l 

12 ifn-itmenn-7699»ii 

13 1FN-JT'*NN- 7746*4 

14 I F N-3T hCNM> 7978 *4 

!* 1FB- 4 ttEHN-99 76*4-22 
33 R-eO.'6-« 

•s oosuwsw 

33 &*;■■ ■»*•••• •■••■*• 
38 ^"•LRB-.FrlNTHE DU» 
?: i*Ert«««»Pv«WON"»«« 
99 F1XE3&979.9 
188 PRINT'S 
183 PRINT'! 
118 PRINT'T 
113 RRINT-1 

ire pr iNT -.n 

123 PRINVT 
138 PRtNT-T 
133 PRINT-T 
148 PRINT"! 
143 PRINT'! 
138 PRINT'! 
133 PRINT"! 



173 PRINT"! 
1 PK1NT"! 
193 PRINT"! 
198 .PRINT "! 
288 PRINT"! 
291 PRINT'88D3S=RVE2 3IEN- 
283 CETRS 
283 PORKJ-irOJH-NEXT 

249 r-i 



326 P»INTTnBte)-nQVEN:SUR<F3>- 

•.;■• LtT^l IFZM'B-TH£NJH-I3ee RETUfttl 

328 OET2«,IF2i--9TTHEHJH-23ao RETURN 

329 OETZI IF^i--irTHEflJHt40eg RETURN 

331 0OTO527 

332 F0R2X-1T01 
334 P0f-£36877,1E# 
^■35 F0RLK-1T05 

336 HN«INTP!ID<l>«S>«W»SQ 

■■■»' = 1TW1HNEXTKX, («XTfL 
"" ^^I^ S IS;i^ E36B7a ' KL F<»«-IT««-HEXTK*; )4EXTKLiNEXTLK 



'Hi nLraiif ■•■••■•■■ 

G880 FCRO-1IO309 NEXT PCKE36S79, 141 PR1MT-CT 

6010 PRINTTfiB(3>-NOmRE DE PRROIS' 

6811 PRINTTRBt3;*TCWOCES' PRINT-PRIKT 

6813 P«INTTRi<4)-[NVISIBL£S ".PT 

6013 PRWTTRB(6)*VISI8LES ^TPPPJNT PRINT 

6816 PPIMTTFIB(4)"LE TEWS-'.S 

6817 PRINT 

6020 PRINT PRIHT:PRINTTfll<2J-pOUR LE SCORE' PRINT - 



HPFUVER SI* S- 



•-PRINT PRINT PRINT PRINT PRINTTRau*)" "ill 




1883 



1 :■:■ 



1049 



),se GosuB84ee Goroaeeo 
:■■■-■■ QQSUB83H 

>D. 90 POKEP'D- I »30728, 4 ! PI 
•D.90:TP-TP*I:RETURN 
,7 POV.EP.D.90-RETURH 
►D. 99 ! 005UB8498 ■ KTCIS999 



•1 RETURN 



«««"03 

m n wi w-sr 



299 PWE37131.9 Pft-3713] PB-37I32 RB-37I34 

!31 P«EP*D.W PtXE2*D,7^S^ 

233 PRIHT-TtEWS-.S.- 

234 REtf-IEPUCEron-* 
233 OETB* fl-PEEKCPfl> PCKERS, 127 B-PEEX<PB) ^P0KERB,253-S-S*1 

... PRINT'TTEnPS-iS 
258 PtKEP-D.Se PtXEN, 91 -POKEN-38728.1 
239 IFPEEX^P-DJ-SSTHEKiOTtKeW 
2S8 IF<AFKBI5>-9QRD»--*-T>€NGCSUB1999 
263 MfMBBi'ZCRZl- 

279 IFC9»OlI29)-8ORIW--»rTHEN00SUBl«69 
273 IFCR»-&4»-80RIW--fi-THENCOSUB1899 
~1 PT3K £P*P ,99 

■ BO .«"" 

349 ROMIItHIIHni 

::a ww-5et:NTf,t:v.» 



■•■.■:■■■■.. 

342 NEXTZX ■ RETURN 
399 0OT0399 

FPEEK(P+D-l^-63THDP0t(EP*: 

FPEEX ( P*D- 1) «33TH£KP0KEP«: 

FPEEX<P*D-l/"169THEtiPWEP 

FPEEK(P*B--1)"214THEHP0KEP- 

"0- 1 P0KEP»D*1 . 32 : PWEZ-D 

FPEEK(P-D*22> "63THEHP0K EP 

FFEEK<P.D*22>-35THEHP0K£P' . 

■■.■■■ ■-/-■■: ^ -:..■-.- K'-£?.i.ii.;.i,';(;, ; i-r-^r-: ti;.--; 

FPEEiaP+D*225 ^MTHENPWffiP+D. 98 -TP=TP+l: RETURN 

i=D'22 P0KEP*D-22.32-P0KEZ*D,7 PtJXEP*0.90:RETUPN 

FPEEK<P'-a.n-63THENP0KEP*D.Se &0SUB8488 ^ GOT 08880 

: -■ ■■ ■: : :,'■ _■■-■■ r:---. ,,: .- . : .-.■ 

FPEEK-:P*D*I>.168THEI*>0kEP*D.38:FtJKEP*D+lt3B7S8,4:PT-PT+] PETiJPK 

FPEEK<P*D*1 J=2 14TNE[(P0i'£P*D, 98 TP-TP'l RETURN 

™D.1-PWEP*D-I,32P0KE2*C,7:RETURN 

FPEEKCP*D-22)-63THENP0KEP*D.9e OCSJB3400 " GOTO8098 

FPEEK(P+D-22)-33THENP0KEP*D.98-G0SUB9389 

fP=E/<P+C-22>-[€8T:-ENPCh'EP+B,9a PC>-.EP-D-Z2*3a723,4 PT.PT-] PETUPN 

FPEEK(P.D-22)-2I4TKENP0KEP*D.98 TP-TP-1 RETURN 
1093 >&-22 P.V--Ef"->i2.;-J P',-:EZ*D.7'P0KEP*D.98:RETURN 
2eeg PWE36B79. 13'S=38422-a-9 

2881 F-3 

2882 P0KES*F.8WXE36976,B 
2884 IFF-28THEKS-S*22-COT02881 

n StAT 2883 iFg-2S3-44.32-7THEN PCXE36876. 3 RETURN 
2886 O-Q+l 
2097 F-F*l 
2033 P0KE36376.23900TD2B82 
4998 - = :'««•••«»«■•.•• 

4991 R£.-1*«**nO0E*«*H 

4992 REn»*D'EMPLOIW» 

4993 REfl •■•••• •*«*•■• 
3088 P0KE36879, 77 PRINT"^- 

"!HTTRB(3); - f«;DfimW3E DU" 
NTTRBC7>;-«JCT/STICX- 
■■"PRINT 

" PRINT 



5017 PR 

3813 PR 
3822 PR 
3924 PR; 
3826 PR 
5829 PR 
3839 PR 



6821 CETS« 

6822 lFSfO"S - THEN00T0*e21 

6823 TP-TP« = W3888 
6823 PPlNT-mflKSJ-LE BCORE^ 
6826 PRIHTTRBOJ'INVIBIBLES - .. . 
6828 PfilMTTRBO)-VISt*£S>a---;TP 

6833 PRUfTTFIBO)-TEnP9--';S 

6831 PRlNTTRB(8>-iONUS *-iKTtTK*TX 

6832 PRINTTflBUS) ■ 

6836 S03eee-(PT*TP*S>*KT*TK*TX 
tOM FRIHTTHB(14)--*;SC 

6038 PRINT PRINT^PRINTTRB(1)-V0US REJ0UE27 <Fl)-pRJMTTRB< 13>*<F3>* PRiNTTPJ' 13. 

6831 PR1HT-SI VOUS flRRETEZ" PRINT- PFVUVE2 SUR(F7)' 

6832 GETG* 

6933 IFOI-'B-THENJH-lSea G0T09 

6834 lFG*--»"THENJH-23e8-00T09 
6933 IFG*-"!t-IHEHJM=489e C0T09 
6937 IFGJ--B-THENRUN 

6865 GOT06832 

7999 PE«4»»»«*»»«*»»«« 

88ee REMCBJBLIETTE DLW 

8801 REfT»»*PHRR«MH«4« 

3882 -:-■■•.■•.■«.... 

8983 PRIHT-^T P0KE36879.12 P0H36S76,B P0rX36873.8 

9803 PRIHTTT-. / \. / \ / - 

8810 PRINT-n \ / - \ / v / 

3811 PPINT-n X / \ /• 

3012 PRINT" I P 

8815 PRINT" I / sr 

8816 PP.iriT- i *c< r 
8818 PRINT" I v \r 
8823 PRINT- L J- 

3823 PRINT* • \ /■ %. f \« 

3927 PRINT' S \ / \ / \- 

8829 PRIMT-.T S N / \ / \* 

9038 FORVU-lTOSBBiNEXT 
9833 PRINTTTTTTrtlUS ETES TOMKS 

8836 GOSUBiee8e:FaRT-IT02B-39^NEXT 

9939 PRINTTWKFDPOUR REJOUER- 

B048 GET2*- IF2*O'B-THEN00T08e39 

BB42 00T09 

8480 FDRVU»lT07:POKE3687a,13:POK£36976.231-PrXE36973,232 

B41B F0Rn-lT0488 NEXT 

8429 P0KE36876.224 - P0KE36S73. 223 

S438 F0Rn-IT0499:NEXTiNEXT¥UiR0KE36978,13-RETURN 



HTTRBC10J-* 

NTTRBC9)-W r 

NTTRB<7)-BV» I /n :■ rsT 

NTTRB<7j-m»v^ i ■- n »>fr 

NTTRBC9)-» p: PRINT 

NTTRBt IB)' WuT -PRINT -PRINT 



8300 REr»4« BONUS •••■ 



NT' I 



fl:» 



OU FTVEC TOUCHES'^ 



T^PRINT-i ZftSftf.wm CftSR*-Wr- 

3832 PRINT' ■ t W 

3833 FQRHJ.1T02:P0KE36878. I3:F0RL-1T0193 

3934 P0K£36876,INKRHD<l)»12B>*128:F0Rn-IT0ia NEXT71 NEXTL:P0re36976,9: 



B-HEXTKJ 

3838 FGRG-ITO1S80-NEXT 
3931 RETURN 



3998 REr.»»»f.C«XUt.»« 



0313 P0KE36879.8 

8328 IFNM-1THENKT-KT4399-RETURH 

B322 IFNM-2THENTK-T)(*130 RSTJRV 

B324 IFNH-3THeHTX-TX*2«B:RITURH 

19989 P0KE3697B.13 

18882 FORTH- 1T03 

18886 F0RNT*ie9T0233STEP2 

13886 P0KE36876,nT 

18010 FCRHT-1T019 NEXTNT NEXT71T 

10812 P0KE36876.6 

18813 FCWfT»lT0198:NEXTnT:«XTTN 

19914 POKE36878. 8 RETURN 



-&- 



a r% 



^ /*^ 



LES DEULIGNEURS DEULIGNENT ENFIN 



Cette semaine. je ne peux me plaindre que de la surabondance el de 
la quality de vos productions. Je n'en feviens pas ! Imagination et 
programmation frisent le ge*nie ! Allez Luya ! Et que ca recommence 
et que ca empire au long des semaines et des mois a venir. Je vous 
laisse le plaisir intense de contempler la selection de la semaine. 
nScessairement incomplete du fait de I'extreme prolixite' (ga se dit 
?a ?) de vos creations. 

Comme le veut la tradition, nous commencons par les accessits. 
Surprenant. n'est-i! pas ? 

Premier nomme\ Florent COULON a la tremblote depuis qu'il a 
pondu ce chef-d'oeuvre. Visiblement cetle maladie est contagieuse 
en dlable... Parlez-en a votre C64 ! 

Listing COMMODORE 64 

IB P0KE53279-S POKE53278y3-POKE5327e/i0: 

P0KE53279. 1 1 P0KE5327B, 12^P0KE532?9, 13 
28 P0KE53279, 14:POKE53270. 15 -RUM 



Le second accessit est pour Jean-Marc JACOUET et son programme 
sectaire qui ne s'adresse qu'aux possesseurs d'Atmos. Ceinture 
pour les Oriciens cette semaine. Votre touche 'FUNCTION" ne sert a 
rien ? Plus maintenant. elle effectue un CIS direct. Mais si vous 
modifier le 16eme et le 17eme Data de la ligne 10, vous pourrez 
obtenir d'autres affectations, dont je vous donne la liste.bien en- 
tendu. 

LIstedeFONCTIONS 



ICC ET KC CLl 

(32 ET K9 OEETORE 

•32 CT ICC ;HIftES 

•13 ET W* itKQOT 

•CI ET *FA EXPLODE 

•CI ET •"* ZAP 

••F ET IFfl PIHS 

IE& EI ICS UC*ES I 

•EA ET IDS LORE! 1 

•It ET ICO TBOH 

•1) ET ICO TBOFF 

ICC ET IF7 EFFRCE C(tPB EM HE8TRMT 

EM 100E MAJUSCULE. 

in n tci nvn cftet sue cudseum in* 
Listing ATMOS 

IS 0PTP»79,«e*,l8.«PE.I3,(t2,iEB 
, •Ft5- »F0, 3,«W- 0. 848, #20. »CE, »CC 
-•R6.t0.»40 
20 FORF-R<TOTO»^12^REF10H'ROKEF. 
PI ■ NEXT ■ D0KERZ4H., M84C i P0KE«Z4C . • 
04 



Eric ViALA inaugure en vous offrant le premier deuligne Canon X07- 
Son programme vous permettra de jouer aux Echecs, au Go. a 
Othello avec une pendule, comme en competition quoi. Lorsque 
vous voulez d6clencher la pendule de votre adversaire (et arr§ter la 
votre), appuyez sur la barre d'espace. 

Listing CANON 



+ 



Nouvel arrivant dans ce concours, I'EXL 100 fait une entree rej 
qu<Se grace aux talents de Designer de Philippe MASETTI. 

Listing EXL 100 

19 CALL HRONC'M'M, 11 > = DEGFOR 1=0 TO 319 

Z= I *5 ■■ CrlLL PICK "CM, 59-50*SI HC Z > > 
28 CRLL LINE<"b'M/S8/58«SINCZ>>: 

CALL LINE<"Y'M,50-5S*SIN<Z>> = NEXT I 



Encore un qui n'avait jamais 616 prime: ("Atari 800-.- Patrick PHILI- 
BERT rfipare cette lacune en trois coups de cueiller a pot et deux 
lignes. Une suggestion de ce que vous pourriez voir cet 6t6 au-, 
dessus des plages ! Pour les Atari 600. change; le "POKE 40479-J" 
en 'POKE 15903-J'. 




Listing ATARI 800 



(4 



TO 



1 POKE 732, 1!? " " :DIf1 ft«(]9l)iR0KE /H3 
01FOH I 1 TO lOliMdtl)-* —NEXT I 

0,61 fr's—' LErCICOOflEH- 

/ SOUNO a,?2,0,4:POKE 7I2,148:FOR K 
01 :FOR J=0 TO 39;P0KE 494?9-J , ASCti 
K, J«K))-32iNEXr J : NEXT KiGOIO 2 



Et qui est le grand gagnant dc la semaine qui gagne deux logiciels a 
cboisir dans le soft parade ? Encore un nouvel ordinateur prime" ! 
Alain REBOUT vous propose un authentique utilitaire de redefinition 
de caractere en deuligne pour Spectrum. II vous donne les donnees 
decimates pour uiifiser vos nouveaux caracteres en programme. 
Wonderful indeed ! 



Listing SPECTRUM 




MpTsrnBiSt WT-gAN^svisa 

ASBVi' 1 : FOR zS TO 8. PHINT ^N^ 
a.OT 1,14.1-1 PRINT INK 6, PflPe 
fl *, FLFtSH l.flT 1,16," -,t>T 1,10 
";flT I .33; " ". Ptt 

'■.ftt 1.19,- '',HT J, 21," ", 

3," ". INPUT INK i.-oi.i i.; 

t»] ClHili ? ifi: LET l.LCN tt 

PRINT INK 7, PfiPCR 7i TLFI3M «,fi 
T 1,16," ". LET P(I-1I -8 

TOR X«l TO I: BEEP .1, -2*X: PBI 
NT INK liflT 7,13»LIPL r|lxl;'*B": 
LET p U-1J "P Il-ll * iat CA-VflL (■«<■ 




iNT In, 



a NEXT X; PRINT PAPER 8;RT I, 
ao,P(I-ll: NEXT'Z: LET 1-1: POR 
X«U5R "•" TO U5R "•■■»7; RE5TOOE 
S. DRTR p(») RERD p (I) . POKE_x, 
PI«) Let i»*+i: NE&T x: PRINT fi 

t ae.ia," ": border i . inpu 

T "VOUltt --■ 



RUN 



OR rtm 



TNEN 



X- 



Les humonstes n'ont pas failli a leut tache cetle semaine el un nou- 
veau prix leur est destine un logiciel pour le deuligne le plus drolc 
et le plus original et le plus gonial et le plus beau et le plus plus 
mais quand m&me moins plus que le grand gagnant du deuligne de 
la semaine. 

Aujourd'hui le gagnant est St6phanc BLANC avec son deuligne intcr- 
dit aux moins de 18 ans et aux myopes. Le voici dans son integra- 
lite, faites un R.A.Z avant de lancer par RUN. ce sera plus propre. 

Listing THOMSON 




1 DEF!HTI,JiLOCfiTL'e,8,0tSCREEN7,0,0!REST 
OPE: FORJ-IT03:FORI -20804 TO20364STEP48! RE 
HC-M*,B<!POKEI.VflL(Af )!P0KEI + 1»V«L<B*)!HE 
::TI, JiRUMiDATfl0, 192,8, 192,8,64,192,224, 1 
?3,96, 63,96,63, 224, 34. 64, 36, 128,71.224 

2 DATR8, 192,8, 192,0,64, 192, 192, 193, 192,6 
2, 192,63,192,34. 128,36, 128,71,224,0,192, 
0, 192,8,64, 192, 192, 195,192, 126. 128. 126, I 
28.71,8,60,128,71,224 



f. 



~k 4 



A la semaine prochaine. Continuez vous files sur la bonne voie I 



dossier Las Vegas 



COMMODORE ENTRE CIEL ET ENFER 



Si Atari a choisi le spcctaculaire 
pour presenter ses nouvclles 
machines a Las Vegas. Commo- 
dore a retenu des moyens plus 
classiques pour imposer a I'es- 
pnt du public ses rtouveaux mo- 
deles: quotidiennement. deux 
pleines pages du CES Daily 
News (bulletin edite pendant 
Cexposition) ont eie squattfSes 
par une superbe publicity 
comparant IBM et APPLE au 
nouveau ler de lance de 
Commodore le C128 



paraisseni. tous deux bases sur 
le meme concept: 

Le Commodore 128 propose 
carrement une triple configura- 
tion sous un meme capot. Ifl- 
croyable non ? 

II est tout d'abord compatible a 
100% avec le Commodore 64 
grlce au mode 64: micro-pro- 
cesseur 6510, un 6581 supple- 
mental pour le son, 64 Ko de 
RAM. 16 Ko de ROM. Basic 2.0 




Cette nouvelle machine, qui 
existe en deux versions, une 

classique et une portable, vient 
s'ajouler a I'ancienne gamme 
qui ne disparalt pas pour Tins- 
tant: le Commodore 64 continue 
sa carriere. mais se vendra drj- 
sormais 125 S ! Le Plus 4 qui 
n'est pas encore arrive" officiel- 
lement en France descend a 300 
S et le C16 aux environs de 100 
S . Multipliez ces prix par 11 
pour avoir le prix de vente ap- 
proximatif de ces ordinateurs en 
France, combien vous trouvez ? 
50 % de remise ? 60 % de 
rabais ? C'est bien ca. vous ne 
vous etes pas trompe. quand les 
ameVicams cassent les prix c'est 
pas de la rigolade ' 

Mais revenons 3 nos nouveau- 
t6s, deux micro-ordinateurs ap- 



(celui du C64), un ecran de 25 
lignes de 40, une haute resolu- 
tion de 320 x 200 points. 16 
couleurs et 8 sprites. En fait 
vous avez un C64 complet et 
tous les softs existants peuvent 
tourner sur le C128 ! 

Le deuxieme mode est le mode 
128. et la les nouveautes et les 
arguments foisonnent: le micro- 
processeur du monslre est un 
8502 compatible 6502 pouvant 
gerer jusqu'a 512 Ko de me- 
moire. Le 6581 est toujours la 
pour le son. La mfimoire se 
trimbale 128 Ko RAM extensible 
a 512 Ko el 64 Ko de ROM dont 
16 Ko pour le DOS. Un nouveau 
Basic de competition, le 7.0. 
cohabite avec un rnoniteur as- 
sembler pour le langage ma- 
chine. L'ecran de 25 lignes est 



commutable en 40 ou 80 co- 
lonnes (comme un Apple He) el 
comporte deux modes graphi- 
ques haute resolution 320 x 200 
points ou 640 x 200 points 
(mieux qu'un Apple lie), ainsi 
que 16 couleurs et 8 sprites 
(beaucoup mieux qu'un Apple 
lie !). Les Macintosh et Atari ST 
ne perdent rien pour attendre 
avec ce mode 128 ! 

C'est lini ? Pas encore ! Vous 
pouvez travailler en mode CP/M. 
c'est vieux. mais une gigantes- 
que logitheque est disponible 
immridialement, Ce Iroisieme 
mode utilise un bon vieux 
micro-processeur Z80A qui oc- 
cupe deja les entrailles des 
MSX. Spectrum. Philips et de 
bien d'autres machines. Le 
CP/M plus version 3.0 (dont la 
compatibility n'est pas totale 
avec tous les softs CP/M} auto- 
rise 128 Ko de RAM extensible a 
512 Ko, 40 ou 80 colonnes en 
mode texte et les deux modes 
graphiques precites 

Voila pour les capacites inter- 
nes, en ce qui concerne I'exte- 
rieur on dispose d'un clavier de 
92 touches dont un clavier nu- 
merique. 8 touches programma- 
bles, 8 curseurs. une touche 
HELP, une touche ESCAPE (ex- 
cellent pour deplomber les 
softs !) et un inverseur 40/80 
colonnes. Pour les en- 
trees/sorties c'est un veritable 
noeud ferroviere: un port utilisa- 
teur. un port serie. deux entrees 
joystick, une sortie teTe. une 
sortie rnoniteur, une sortie 
video composite (vous pouvez 
done brancher trois ecrans si- 
multanement), un port cartou- 
che, une entree et une sortie 
audio. 

Le prix ? Combien vous dites ? 
Une brique ? 5.000 balles ? 
Rate, la bete doit etre commer- 
cialisee aux environs de 250S . 
ce qui devrait faire a peine du 
2.800 Irancs en France. Pas mal 
beau, pas trop cher mon frere ! 

La deuxieme version du C128 
est le LCD , petit bijou portable 
orru; d'un superbe ecran replia- 



ble a crislaux liquides de 16 
lignes de 80 colonnes (128 x 
480 points en haute resolution). 
ecran d'ailleurs identique a celui 
Que nous promet Apple depuis 
des lustres pour le He. Son cla- 
vier comporte 72 touches don! 8 
programmables et 4 curseurs. 
Base sur un micro-processeur 
65C102 technologie CMOS 
(votre micro-processeur reste 
froid, quels que soient les ou- 
trages que vous lui (aites subir), 
il propose 32 Ko de RAM et 96 
Ko de ROM. Et 96 Ko de ROM 
qui ne choment pas. on y trouve 
une lloppee de logiciels in!6- 
gres. de quoi faire palir deux 
Olivetti et 1 Epson: Iraitemenl 
de texte, tableur. carnet 
d'adresses, calculatrice, bloc- 
note, Basic 3.6, rnoniteur as- 
sembler, traitement de li- 
chiers, agenda, fimuiateur pour 
un terminal et pas de raton !a- 
veur. Pas mal pour une ROM. 
non ? Vous croyez qu'elle est 
(SpuisSe apres tous ces efforts ? 
Detrompez-vous, elle se charge 
encore de la communication 
avec I'exterieur: port d'en- 
tr^e/sortie serie. RS232C, Cen- 
tronics, port d'extension. lec- 
teur de code-barres, modem 
300 bauds intSgre" et prises Jack 
( Tramiel, bien sur ') pour bran- 




LCD 

cher un coupleur acouslique 
(bon plan pour les trafiquants 
de bases de donnees). Poids 
confortabie: 3,5 Kg batteries 
comprises (rappelez-vous: le 
SX64 en pesait 13 Kg...). Par 
contre. pas de prix annonce, 
mats avec le cours de I'ordina- 
teur ricain actuel. on doit I'avoir 
pour une poignrje de pois 
chiches. 



BRODERBUND EN iCHHNT 



Broderbund est une dynami- 
que societe de logiciels din- 
gee par Doug Carlston, son 
frere Gary et sa soeur Cathy 




Aouaouaaaaaaaaah ! ' ' 

en qui j'ai place loute ma 
confiance et mon amour lors- 
qu'ils ont sorti Lode Runner. 
Cela devint de la ferveur 
mystique a la sorlie de Lode 
Runner Championship, et 
c'esl en passe de devenir de 
la deification au vu de leurs 
prochains litres, reveler, au 



Consumer Show de Las 
Vegas. Parmi ceux-ci. Dazzle 
Mation (un programme de 
creation d'animation), Fanta- 
Vision. Caplain Goodnight. 
Lite Star. What color is your 
parachute (De quelle couleur 
est votre parachute), Where 
in the world is Carmen, San 
Diego (Ou peut bien etre 
Carmen, San Diego dans le 
monde). Toutefois, les logt- 
ciels ludiques ne sonl qu'une 
infime partie de leur gamme. 
puisque leurs produits vedet- 
tes sont Bank Street Writer, 
un traitement de texte qu'ils 
declarent etre le plus simple 
d'utilisation. Bank Street Mai- 
ler, un logiciel de mailing a 
utilizer en conjonction avec 
le precedent, et Bank Street 
Filer, une base de donnees. 
naturellement ulihsabie avec 
les deux precites. Doug 
Carlston a declare vouloir 
mettre I'accent sur les pro- 
grammes professionnels a 
i'avenir, Pourvu qu'ils ne lais- 
sent pas tomber les logiciels 
de jeux ! 



ADAM EST MORT 
PAIXA SES CENDRES 



II avail pourlanl une belle gueule 
avec sa robe blanche, son cla- 
vier mricanique el son impri- 
mante. il faisait tres 'pro" et sa 
rficenle baisse de prix aurait pu 
lui trouver des acquSreurs. 
Les reprfisentants d'Adam 
etaient done au Consumer Show 
de Las Vegas, confiants dans 
leur machine, surtout au prix ou 
ils t'avaient descendue. lis at- 
tendaient tranquillement sur leur 
joli stand que les draps qui ca- 
chaient les machines Atari se le- 
vent. rien ne pouvait les inquiS- 
ter serieusement. Mais quand- 
les prix et les caracteristiques 
des ordinateurs Atari, Commo- 



dore et MSX ont (5te connus. Ms 
se sont precipites vers la salle 
de conference, ont annonce Car- 
ret de I'Adam el ont foutu le 
camp en courant. C'est pas 
beau ca ? lis ne peuvent pas (ut- 
ter done its se relirent I Je 
connais pas mal de machines 
aulrcment merdiques qui conti- 
nuent leur "carriere", ces fabri- 
cants fcraien! bien de mcditer 
sur cet exemple ! 




REVENDEURS, 

JACK TRAMIEL VOUS PARLE ! 



Non content de casser le rnarche 
de la micro. Jack Tramiel veut 
figalement (aire baisser les 
marges bene'liciaires des distri- 
buteurs En subslance, il a de- 
clared" Les revendeurs ameri- 
cams n'ont meme pas 15 % de 
marge et ils se debrouillem 
quand meme pour (aire du dis- 
count Pourquoi voulez-vous 
donner plus aux distributeurs 
des autres pays, ils n'ont qu'a 
sr; dribfotiillni I" Si apres cela 
on trouve encore des ordina- 
teurs aiileurs que dam les su 
permarches. c'est que vous 
n'avez rien compris au film ! 




QUE VA E4IRE>1PPLE? 



Apple n'expose pas a Las 
Vegas. Ce salon consacrr; a la 
Video et aux ordinateurs farni- 
liaux n'est pas suffisamment im- 
portant pour que ses represen- 
tants daignent se deplaccr. 
Cette ann£e, Ils ont du toutefois 
venir officieusement 'admirer' 
les machines qui atlaquenl dt- 
rectement leur gamme. Et ils ne 
devaient pas etre trcs a 1'aise 
dans leurs baskets, ils ont wtfi- 
ret a Irouver des solutions rapi- 
des pour endiguer le raz de 
marrje qui risque d'emporter 
leurs clients vers Alari ou 
Commodore 

La reponse au Commodore 128. 
qui se positionne en concurrent 
direct du lie. est deja prcvue 
c'esl I'Applc llx qui gardera la 
compatibililc avec ler. logiciels 
actuals toul en lournanl avec un 
if) bits ii faudra simplement lui 
rajouler quelques caracterisli- 
ques allftchanler,, divisor son 
pnx de vrmln par deux et le sor- 



lir avant les vacances d'ete alors 
qti'il ne devail voir le jour qu'en 
86. 




Pour rrjpondrc aux Alan 130 SI 
et 520 ST, qui ne sonl ni plus m 
moms que des Macintosh ame- 
liorcs. cc sera une aulrc pairc 
de manches ' Oue faire contre 
les prix lous annonccs par 
Atari ? L'avancc on logiciels 
disponihles sutlira l-elle a sau- 
ver les mcubles en atiendant ' 
En attendant quoi "> La couleur 

8 our les Mac ' Un ofdinateur 64 
its 7 Un miracle ' Pourquoi 
pas: Apple a plus dun lour dans 
son sac et Trarmcl peut se plan- 
ter, on peul rever i 



Nouveau lecteur de 
disquettes Commodore 



Le nouveau lecteur de dis- 
quettes 1571 complete la se"ne 
128. II est dirige par un 6502 
dispose de 2 Ko de RAM et 32 
Ko de ROM supportant le DOS ,, 
II Iravaille a 3600 bauds avec le 
C64 (ce qui signifie qu'il est 
toujours aussi ringard que I'ac- 
tuel lecteur 1541). Avec le C128 
ou le LCD, ca va d6ja beaucoup 
mieux qu'avec pepe C64. notre 
lecteur fonce tele baissee a 
18000 bauds (cinq fois plus 
vite, merci Nikki Lauda) et sous 
CP/M, c'est a tombeau ouvert et 
a 42000 bauds que se deplacent 
les donnees (onze fois plus vite 
qu'avec le C64, merci Alain 
Prost). Notre lecteur s'abonne a 
I'hebdo et. tres content, utilise 
des disquettes double 

face/simple densile recevant 
350 Ko de donnees. compatibles 
avec le lecteur de disquette ac- 
tuel 1541. Sous CP/M, il ne de- 
vient pas boulimique. mais il 




avale quand meme des double 
face'double densite avec une ca- 
pacite de 410 Ko. formatters en 
compatibility avec le systeme 34 
d'IBM. le Kaypro et I'Osborne 
Deux ports serie et un poids de 
3,8 Kg sont les deux dermeres 
caractiristiques de ce lecteur de 
disquettes qui n'a pas. pour 
i 'instant, de prix de vente. ce 
qui ne veut malheureusement 
pas dire Qu'il est gratuit ! 



SHARP EFFEUILLE LA AAARGUERITE ! 



Quand je pense que lous les tri- 
mestres on offre des voyages en 
Californie, j'ai les boules qui me 
montent dans la gorge. Je 
m'finerve parce que je n'ai pas 
encore reussi a mettre un pied 
chez les Yankees, et a mon age 
il serait peut-etre temps de s'af- 
foler. La moralite de cette his- 
toire est simple: au lieu de laire 
du gringue et du pince-fesses 
aux hrjinsses de ['air, je suis 
suspendu a mon tel£scripteur 
comme un vieux jambon de 
Bayonne en train de s6cher. Je 
reve de palmiers, de Cadillacs et 
de Disneyland en attendant que 
les depeches tombent. L'embe- 
tant, c'est qu'un telex est aussi 
froid et impersonne! qu'une in- 
terview d'lsabclle Adjani. 
Ah !...Si au moins j'fitais sur 
place I ! 

Bon. Alors celte semaine. la 
qrande nouvelle c'esl le CONSU- 
MER ELECTRONICS SHOW de 
Las Vegas. Je vais vous le ra- 
contcr comme si j'y etais alle, et 
pour ne pas me vexer, vous 
allez laire semblanl d'y croire. 
Merci Suivez le guide, par la 
SVP... 

Comme tous les ans. le CONSU- 
MER ELECTRONIC SHOW d6- 
ploie ses tastes dans la zone 
d'activites commerciales (ZAC) 
de Las Vegas. Les jeunes arrnSri- 
caines. dont I'essaim s'enfle 
avec la froidure, babillcnt de- 
vant les guichets, Elles tiennent 
leur ticket dans une main et 
leurs 312 cartes de credit dans 
I'aulre, a moins que ce ne soil 
1'inversc et reciproquement. Je 
profite de leur inattention pour 
m'inliltrer dans la place, comme 
dix milligrammes d'insuline 
dans la seringue d'un diaboti- 
que: discrctement. 
Je papillonne dans les atlees. 
doucement grise par le pet des 
pop-corns sous les domes de 
plastique. Puis, la verite prend 
corps dans mon cervcau gele: la 
grandc nouveaute de I'annce. ce 
sont les MACHINES A ECRIRE 
ELECTRONIQUES ! ! Les ordina- 
teurs, a part Alari, Commodore 
el MSX sont piutot au rencart. 
D'ailleurs, tes pools de dactylos 
venus par cars cnliers sonl ag- 
glutin^s autour des stands 
CANON, BROTHER ou OLIVETTI. 
Mais si les grandes marques po- 
larisent ['attention, une seule 
saura retenir la miennc: SHARP. 
En elfet, le constructor nippon 
(ni plus mauvais qu'un autre) 



presente une petite merveille: sa 
nouvelle machine a ecrire elec- 
Ironique ne pese que trois kilos 
pour une epaisseur de 
6cm. ..mais ! ! ! !...elle est en 
plus dot£e d'une vraie margue- 
rite et d'une cartouche a 
ruban I ! 

J'avale mon Big Mac de travers. 
et j'ai une pensee emue pour la 
France, mon pays d'origine, oil 
les imprimantes a marguerite ne 
coutent pas moins de 15000 
francs lourds Car cc petit bi]Ou 
de Sharp ne depasse pas les 
400 dollars. Moins de 4000F ' 
Ouand le vendeur bride m'expli- 
que que la petite Sharp peut se 
connecter sur la quasi lotalife 
des micros existants. je craque 
et je m'effondre sur le tapis en 
plcurant. 




Une main secourable s'abal sur 
mon cpaule. C'est ceile dc la 
femme de mrinage. *Hfi ben. 
m'sleur Ordine ! Z'etes encore 
endormi sur la machine a 
telex ? |*. Je marmonne quel- 
ques mots d'argot. hisloire de 
me donner une conlenancc 
Puis, transi. je vais me rrjlugier 
dans le placard des programmes 
deuligneurs. Le seul ou il y att 
encore de la place La, a I om- 
bre des cassettes en fleur. je 
commence a rfidiger ce papier 
en songeanl que si f'elais vrai- 
ment alle la has, j'aurais ramenc 
des las de photos exciusives. 
On aurait done pu augmenler le 
tirage du journal de 5U00 exem- 
plaires et laire passer sotl prta \ 
12 francs Finalcmcnt. vous 
I'avez echappe belle. 

Kid Ordine 



L'ORDINATEUR SANS 
FILET SANS CLKIIER 



Pas de clavier' c'esl une 
console de jeu Pas dc lils pour 
les joysticks: c'est I'inlrarougc 
qui fan loumsi le bastrlncuo 

Pas de jeux bidons: Lode run- 
ner, Pinball ou Donkiiy Kong 
sont la. Pas dc pnx prohibilil. 
c'est japonais. ca s'appclle Nin- 
tendo, ga coutc a peine t 000 
balles Si ins cartouches dc jeux 
vous reviendrons a moms de 
150 Irancs 




dossier Las Vegas 



MSX, CA PASSE OU CA CASSE ! 
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C'est nouveau, pa Went de sortir 



BIDOUILLE GRENOUILLE 



Le vieux mage se redressa peni- 
blement II laissa planer son re- 
gard pale sur ses alambics el ses 
gnmoires pOUSSiereux, dun air 
las Une pierre philosophale trai- 
nait dans un com de la piece. 
mais Hosgar Artemis n'y prela 
pas attention Une bougie vaaiiait 
au rythme des vapeurs brulanles 
de decoctions estranges qui se 
preparaient MalgrS ses efforts 
redoubles. II n'avait toujours pas 
reussi a invoquer Asgarolh. le 
maiire supreme des forces du 
nisi II regarda une fois de plus. 
comme il laisait chaque soir 
depuis bien longlemps, le pen- 
tagone sacre trace sur le sol a 
meme la pierre. II se rassit. ef- 
fondre. Sientot trois siecles qu'il 
(entail vainement ce contact 
Une fueur brilla dans la penom- 
bre, aechirant I'obscurite qui 
s'epaississait. Le mage tourna vi- 
vement la !§te. Darts le pentagone 
se tenait un etre petit et difforme, 
mais dont les trails n'evoquaient 
pas le Mai. II eut un mouvement 
de recul. 
'Qui es-tu ?. 

- Je suis Oberon, a ton service, 
bumain... 

- A mon service ? Alors, 6 Obe- 
ron, roi des Chambaz, pouvez- 
vous me dire comment faire pour 
invoquer Asgaroth ? 

- Asgaroth ? Jamais entendu par- 
ser. Mais si tu veux. je peux te 
filer un tuyau pour TI-99. 

- Vous pouvez me... quoi ? 

■ Un tuyau. banane. Sur certains^ 
modules, notamment Munchman. 
lorsque tu tapes * » * , c'est a 
dire shift 8. shift 3 et shift 8. tu 
accedes a un mode Test. 

- Je... Mais vous rites le 
Demon ! 

- Mais non. banane, t'as qu'a es- 
sayer ' Bon, tu me gonfles. bye.* 
Un eclair de fumee jaillit au centre 
de la piece. Lorsqu'elle se dis- 
sipa. I'elfe avail disparu. Le mage 
se precipila vers le sol. mais nulle 
(race ne subsistait de cette mer- 
veilleuseappaniion. 
'Don-image qu'il parlat cette lan- 
gue incomprehensible", pensa-t- 
il. "Mais... Peut-etre mon vieux 
livre des sorts peut-il m'aider T 

II se dirigea dun pas chancelant 
vers I'armoire branlante. et (endit 
sa main noueuse vers une eta- 
gere II ouvnt le livre a une page 
signer 

'voyons Language spell.. . 

Comprehension des langages... 
Prononcer a haute voix. , 
II alia se placer pres du penta- 
gone et commenga a marmonner 
de sa voix usee. 

'Aztec Tomb, premiere partie, par 
tous les Kartheuser de 1'enier, 
que le C8M54 maudit et I'Atari in- 
fernal te soient retires a jamais si 
point ne parviens a la solution 



avec ce qui suit ' II resla son- 
geur un instant, grommela quel- 
ques mots a propos des formules 
magiques si complexes, prit une 
profonde inspiration et contmua 
"s. look hall, take jar, w. look 
bed, go trap, take cloak, wear 
cloak, look cellar, take key, u. 
open draw, took draw, take key. 
e, n. go ladder, open chest, 
throw key. take sword, take rope, 
d. s, open door, go door, throw 
key. climb building, take wood, 
d. s. throw wood, e, look pool, 
(ill jar. took (ish. catch fish, look 
fish, w, go bridge, n, take 
mouse, n,w. remove cloak, throw 
cloak, go gate, empty jar, n, e. 
fill jar, w. go gate, empty jar, 
lake cloak, climb bean, throw 
mouse, go path, go valley, s. 
throw rope, climb rope, give 
cloak, take box. open box, take 
map, look map. d, n, e. go har- 
bour, go boat, look boat, go 
cabin, take torch, go hatch, n, go 
island, go hole, light torch, take 
jacket, wear jacket, u, unlight 
torch, go boat, n, e, go south- 
east, go cliff, jump over, swim. 



le Maudit te boulfe les eniratiles ' 

- Pourquoi tu t'enerves, petit 
pere 7 C'est pas fini I Apres ga, 
si tu fais Feel Plastic, tu revets le 
scaphandre. Et tu peux refane 
Pull Rod et Feel Plastic autant de 
fois que tu veux. Par contre, j'ai 
toujours pas trouve comment 
soutever le tapis. Alors, Feel 
Plastic, et tschaw...' 

Eclairs, tonnerre. il disparut Le 
vieillard s'elfondra, terrasse. II 
prit sa tete dans ses mains, et 
commenga a geindre. 
'Mais que faire, o puissant Lusti- 
ger, pour contrevenir a cette 
monstrueuse mascarade ?* 
Avec apprehension, il vit les 
contours du pentagone s'illumi- 
ner. Sa lassitude fut a son comble 
lorsqu'il parvint a distinguer les 
traits d'Oberon. 
"Alors, Joe, tu m'as appele ? 

- Pardon ? 

■ T'as parte de Masquerade, 
non ? J'ai un copain qui a un 
Apple. Denaux, tu connais ? On a 
trouve plein de trues. Par exem- 
ple. pour se debarrasser de la Si- 
nister Figure, il faut porter le 




go beach, go forest, n, climb sta- 
tue, throw jar, take diamond, d, 
e, look wall, plug diamond, go 
passage. light torch, end part 
one." A peine le dernier mot pro- 
nonce, des elincelles fuserent au 
centre du pentacle Une desagr6a- 
ble sensation de d6ja vu lui par- 
courut I'Schine. 

'Alors. mon pote, t'as essaye" le 
true de tout a I'heure ? Parce que 
sur Texas, j'ai mieux. 

- Oh. non ! Pas vous ! 

- Oh si. mon petil vieux. Ecoute 
un peu Oans Strange Odyssey, 
pour sortir de la piece hexago- 
nale. il suffit de faire Pull Rod et 
Press Rod. Le tableau s'ficlaire un 
certain nombre de fois. nombre 
qui correspond a I'endroit ou I'on 
se retrouvera. 1. c'est la grotte 
darnvee, 2 la jungle carnivore. 3 
une piece pleine de methane, et y 
en a plein. Tu vas rire. j'ai eu 
542534 clignotements. et je me 
suis retrouve chez toi. 

- Vade retro, Satanas ! Que Luno 



masque qui est dans I 'hotel. Le 
popcorn s'achete avec le dollar 
qu'on trouve sur le cadavre. car i! 
faut le fouiller deux lois. et le 
bouger I Et pour entrer dans le 
labyrinthe. il faut avoir la petite 
boite, attendre que le telephone 
sonne et dire Zorch. Le plancher 
se derobe. et on arrive dans les 
souterrains... C'est pas banal, 
hem, Marcel ?" Le vieillard etait 
entierement replie sur lui-meme. 
tentant vainement d'exorciser le 
demon en esquissant d'inutifes 
signes de croix. 

'Calme-toi. pepere. on est pas 
aux pieces. Par contre. tu vois, 
j'ai un probieme avec The Quest, 
je ne sais pas comment entrer 
dans la grotte. Tu saurais pas, 
toi, par hasard ? Non ? Tu lis Bi- 
douille Grenouille ? Tu devrais. 
c'est vachement bien. Y'a un 
autre true qui m'angoisse. c'est 
Adventureland. Alors la. je suis 
compietement dans la panade. 
Ah ! Un true que je te raconterais 



par le menu la prochaine fois. 
c'est Transylvania C'est super, 
tu verras. Bon. je repars. si t'as 
besoin de moi tu me lais signe.' 
Hosgar Artemis etait prostre 
depuis deja quatorze secondes 
lorsque I'eciair qui commengait a 
devenir habituel jaillit. 
"Salut, kid ! C'est encore moi ! 
Je te derange pas. au moins ? 
Non, comme ga a fair de te pas- 
sionner, je le file tous rnes bons 
plans Celui-la. c'est pas de moi 
parce que j'ai pas de CBM64, 
c'est d'un copain. Carre, il s'ap- 
pelle. Sur Matrix, pour passer les 
niveaux sans combattre. il sulfif 
de presser en meme temps les 
touches shift, run/stop, commo- 
dore et ctrl. Baleze. non ? Mais il 
y a mieux ! Accroche-toi, Anas- 
thase. ga va faire mal.' 
Le pauvre mage n'avait certes pas 
['intention de bouger, trop occupe 
qu'il etait a trembler comme une 
feuille. 

"Pour Ghostbusters. et j'espere 
que t'as vu le film, banane, si tu 
as plus de 10000 dollars et que tu 
n'as pas reussi a arriver au tem- 
ple de Zuul, I'ordi te donne un 
numero de compte en fonction du 
nom entre et de la somme d'ar- 
gent gagnee. Mais ! Car il y a un 
mais... Tu m'ecoules. pepere ? 
Mais si tu rentres JKL pour le 
nom et 40051202 comme numero 
de compte. tu seras ipso facto 
credite de 86000 dollars ! T'en as 
beaucoup. des plans comme ga. 
toi ?' 

II disparut. Une idee parvint fai- 
blement au cerveau surmene 
d'Hosgar Artemis. II va encore re- 
venir... 

A peine cette pensfie formulae, 
qu'elle s'averait... 
'Au fait, papa, t'as un Minitel ? 
Parce que j'ai des codes en pa- 
gaille ! 

- slrzkybgzyldkmbxywzklg... 
crouic. 

- Si tu es sur Marseille, voila un 
plan d'enfer: 16 91 95 91 77. 
C'est quoi. ga ? C'est un PAV qui 
permet d'acc6der au 615... gra- 
luitement ! Genial, non ? C'est 
Banane+ qui m'a file ca. Sur 
613, y a un true p3s mal TBDGT, 
et 33723. La. tu vas te marrer. Tu 
veux mieux ' J'ai mieux. Tou- 
jours sur 613. 192000359. puis 
ECA49010 puis envoi. Et tu sais 
qui c'est qui m'a file ga ? C'est 
The Cunning, mon pote ! Lui- 
meme ! Ca t'en bouche un coin. 
non ? Bon. tu m'excuseras, mais 
je dois me tirer ! Bye !' 

Le corps inerte du vicil homme ne 
bougea pas lorsque pour la der- 
mcre fois la lueur disparut. A d6- 
faut ri' Asgarolh, le mage avail 
gagne l'6ternite dans la mort. 

Crfla. 



LEGOBELETD'OR 



C'est le trophee du 5eme 
concours international de 
createurs de jeux de societe. 
Celui-ci a ete remis le 15 de- 
cembre a 18 heures, j'ai done 
plus d'un mois de retard pour 
vous I'annoncer. J'avais 
perdu le papier dans la boite 
a gants el j'ai repns mes 
gants hier a cause du froid. 
Ce concours est international 
parce qu'il y avait des Iran- 

'..il-, E i des '.'i'-.','.". Las pre- 
miers pnx empochent le Go- 
belet d'Or et le Gobelet 
d'argent. lis vonl immediate- 
ment se saouler la gueule au 
troquet du coin. Les aulres 
candidats primes re<;oivent le 
Pion d'Or. et non pas le 
"PONT" dor comme ils 
I'avaient au. Ils reparlent 
degus en jurant que I'annrje 
prochaine ils liront mieux le 
reglement 

C'est Claude Leroy qui a de- 
croche la limbale avec son 
jeu de strategie: GYGES. Je 
n'ai strictement nen compns 
a la regie, ce qui confirme a 
quel point de lamenlabilisme 
inlellecluel j'en suis arrive a 
force de parlor politique avec 
le redacteur en chef. 
Le concours (International) 
de createurs de jeux est or- 
aanlse par le service des af- 
faires cullurelles de la ville 
de Boulogne-Bill a ncourt 



Vous pouvez vous renseigner 
pour les inscriptions 1985 au 
numero suivant: 604.82.92. 
Que la force soit avec vous. 
Je vous signale que Pierre 
Berloqum faisait partie du 
jury de cette annee. sous 
I'appellation contrfilee de 
•LUDOGRAPHE". Comme 
chacun le sait, Berloquin est 
I'auteur de jeux informatiques 
particuiierement nuls, dont 
NAJA el MODERATO 
COMPUTABILE se revelent 
comme les fleurons de la vi- 
v^ciie Irangaise en matie-re 
de programmation. Mais tout 
eela ne doit pas vou3 decou- 
rager pour aulant, 



Joseph Monod-Poli 
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DYSAN SAOVE LE SOFT 



Les disquettes Dysan vous 
connaissez. Mais saviez- 
vous que cette brillante so- 
ciete californienne possedait 
une filiale en Ecosse qui 
s'occupe aussi de protec- 
tions ? COPVLOCK est une 
protection declaree impirata- 



ble par leurs auteurs. Elte est 
destinee a I'lBM PC. Nous 
I'avons confie a nos meilleurs 
pirates IBM pour verifier la 
validi!6 de leur argument. 
Les resultats bient6t I 

Scratch TRACK 



Dysan 

Software Services 
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DEVENEZ IMPORTATEUR EXCLUSIF 
D' ATARI ET DE COMMODORE ! 



Les orgamsateurs de chaque 
salon prevoient toujours un ac- 
cueil et des services spficiaux 
pour les visiteurs etrangers. Le 
Consumer Electronics Show n'a 
pas failh a la regie, lout etait 
prevu pour que chacun puisse 
irouver chaussure a son pied. 
Un ordinateur etait notamment a 
la disposition de ceux qui cher- 
chaienl un produit americain a 
importer dans leur pays. Tou- 
jours curieux, nous avons done 
consulte I'oracle eiectronique 
et, entre une aliechanle offre de 
distribution de disquettes car- 
ries et une tr6s serieuse propo- 
sition d'importation d'ordina- 
teurs a une seule louche, nous 
sommes tombes sur deux an- 
nonces pour le moins surpre- 
nanles: Atari et Commodore 
cherchent des importateurs pour 
la France ! Ce sont les importa- 
teurs actuels qui vont etre 
contents ! Atari France et Pro- 
cep vont encore nous accuser 



de raconter n'importe quoi. 
nous n'avons pourtant nen in- 
vent* 1 Quant a la notjvaihj so- 
ciete Galaxie, constttuee recem- 
ment par les ancicns d'Atari 
pour oistribuer Atari, ils vom 
nous maudire. a moins Qu'ils ne 
reprennent les deux importa- 
tions offertes el qu'ils vendent 
un ordinateur hybride d'Atari et 
de Commodore Oans ce cas la. 
nous suggerons un nom: Mata- 
dore. I'ordinateur olie • 




ORPHEUS : 
LES RATS QLITTENT LE NAVtRE 



Paul Kaufman et Geoff Phi- 
lips, bien connus par les pos- 
sesseurs d'Oric puisqu'ils 
etaienl a la tete de Tansoft. 
la principale compagnie a de- 
velopper des programmes 
pour l'Oric-1 el I'Atmos. vien- 
nent de quitter la societe a la 
suite "d'ennuis" pour fonder 
leur propre compagnie, Or- 
pheus. Les trois premiers 
litres a etre edites seront 
trois jeux pour Oric. et les 
mauvaises langues murmu- 
rent (et vont memo jusqu'a 
dire a haute voix} que ces 
programmes ont ete ecrits 
durant leur collaboration 



avec Tansoft. Les program- 
mes suivants seronl destines 
aux MSX. au Commodore et 

au Spectrum. Mais plus a 
I'Oric. Chat echaude crainl 
leau froide. 




DECOIMCHAT EST HIM I.SCl.AVAGISTE 



Jacques Deconchat est un 
auteur heureux, II n trouve 
une super combine. Apres 
avoir ecrit un premier livre de 
programmes intitule finement 
"102 programmes pour 
Apple", il a cherche et trouve 
des negres informaticiens 
pour adapter ces program- 
mes sur d'autres machines. Il 
a pu alnsl sortir 13 bouquins 
de '102 programmes pour... 
et y (aire figurer sur la cou- 
verture son nom en lettre de 
leu alors que le nom des 
negres adaplateurs sont rele 
qu6s sur la page do garde 
Apple, Commodore. Texas. 
Oric. Sinclair. Thomson T07 
Thomson M05. Alice. Alan. 
Yeno, Philips VG 5000. Exel- 
vision et MSX onl ainsi eu 
droil a ces superbos pro- 
grammes adaptes moyennanl 
une somme de 100 a 120 
francs solon les ordinateurs 
concernes. Nous esp6rons 
que les negres ont toul de 
mtSme recu la juste remune- 
ration de leur travail. 
Tlens, mais au (ail comment 
sont-ils foutus ces fameux 
programmes ? Oh, vous 
savoz, ma pauvre dame, les 
debutants se contentonl de 
peu, une REM par c), un 
PRINT par la et ils sonl 
contents, ils ne taut pas affo- 




ler cos bonnes gens qui vien- 
nonl d'achoter leur premier 
ordinatour. Les programmes 
faciles font 20 lignos. pas 
plus, et les plus ditficilos arri- 
vent quand memo jusqu'a 
quaranto lignos I Par contre. 
il y a une page entlore d'ex- 
plications pour chacun des 
programmes el le debutant 
est ainsi compietement 
guide. Prendre un guide pour 
valncre une montagne ? 
d'accord, mais pour une four- 
milliftro ? 



LIVRESYBEX 



L'orgamsation de Micro-expo 
n'empfiche pas Sybex de sortir 
de nouveaux ouvrages. "Ams- 
trad, 56 programmes" par Stan- 
ley Trost est un rccueil dc petits 
programmes pas tr6s marrants, 
mais qui peuvcnl vous servir si 
vous ne connaissez vraiment 
ricn au basic 'MSX, 56 pro- 
grammes', c'est la mfime chose 
mais pour MSX, Deconchat fit 
sa sfirlc de '102 programmes 
pour. ." edite choz PSI va bien- 
tdl pouvoir creer une seclc I II 
pourra d'ailleurs recrutcr Pierre 
Monsaut et Eric Ravis qui sor- 
tcnt chez Sybex, "MSX, jeux 
d'action', 'VG 5000, jeux d'ac- 
tion" et 'Commodore 64, jeux 
d'aclion' qui sont tous les trois 
des recuells de 18 programmes 



de jeux pas trop mal foutus. 
*MSX, initiation au basic", de 
Rodnay Zaks vous offre 248 
pages de formation an basic 
pour moins dc 100 francs: pas 
dc problomcs, vous en avez 
pour voire argent. Un bouquin 
pour les enlants, 'Commodore 
64, premtors contacts*, et un 
bizarre 'Alice, programmation 
on assemblcur" ferment la mar- 
che des nouveauttis dc Sybex 





DISTRIBUTION DES PRIX 



Le Temple d'Apshai esl un 
bon logiciel d'aventures pour 
Apple, il est francise e! disiri- 
bue par VIFI-NATHAN. Son 
excellent rapport qualile pnx 
nous lavail (ait entrer en 
bonne place dans le Soft Pa- 
fade, la fiabilite des copies 
nous Ten a (ait sortrr. C'est 
lui qui gagne sans conteste 
le Rmgard 1984 de la plus 
mauvaise qualile de copie. 
Nous autonsons VIFI NA- 
THAN a aposer un autocol- 
lant de cette haute recom- 
pense decernee par 
Hebdogiciel sur les jaquettes 
de sonjeu. 




SET DE SOURIS 



La societe Mouse MATe 
Company vient de sortir un 
ustensile que j'aurai peine a 
nommer et dont le principal 
interet est que la souris 
puisse rouler dessus sans se 
salir les pattes. Le maleriau 
est du caoutchouc silicone 
haute densite qui ne colle 
pas a la peau de la souris, ne 
lui arrache pas les poils et 
I'empeche de glisser. Le pro- 
duit s'appelle Mouse MATe-2 
el est vendu 9.95 dollars. 
Vous pouvez vous servir de 
cette chose indescriptible 



pour etaler la pate de votre 
gateau favori et vos amis en 
seront eblouis de joie et de 
bonheur intense 
(Ahhhhhh...lleluia. 
Ahhhhhh....1leluia !). 

v JR. 



DOCTEUR, FAITES QUELQUE CHOSE, 



Les 26 et 27 janvier a Colo- 
gne se tient un congres de 
"Micro-informatique famiiiale 
et medecine". Avis a tous les 
cacochymes el autres crou- 
lants. vous pourrez bientot 
realiser votre auto-diagnostic 
a la maison, devant votre tele 
favorite. Je sens que vous 
commencez deja a mieux 
alter ! 




HEBDOGICIEL 
ET LES PIRATES 

i"-5 du ny- 
mero 64 r ■ _ 

-?s de bou- 
t-ques et de pe:soi"»s cite-s 
nous ont ecnt de Em 
Ires ofiio: H 

reception et toot et tout, pour se 
piamdre et demander des droits 
de reports? - 
dans cet Ml 

une enquete menSe par deux de 
nos lournahstes pendant piu- 
sieurs semaines et tout ce qui a 
ete ecnt est base sur des fails 
precis sappuyartl sur des preu- 
ves et des temoignages que 
nous avons ve"nfies. Une chaine 
de boutiques que je ne nomme- 
rai pas. ose meme se poser en 
defendeur acrtarne de la lutle 
contre le piratage alors cju'eife a 
abrite en son sein !e plus grand 
copieur que la France ait porte. 
un comble ! 




Pas de droit de reponse done. 
sauf pour Bernard Savonet. diri- 
geant de queiques petites revues 
bien sympathiques comme I'Or- 
dinateur Individuel. Votre Qrdi- 
nateur. etc... Nous avons en 
effet ecnt que les copieurs ven- 
daient les produits de leur inta- 
mie par I'irttermediaire des peti- 
les annonces de rOrdinateur 
Individuel. lis ne se contentent 
bien evidemment pas de celie 
revue et sevissent dans lous les 
journaux qu'ils soient speciali- 
ses en informatique ou pas. 
L'Ofdinateur Individuel reprouvc 
el censure systSmatiquement ce 
type d'annonces. Celles que 
nous avons vues lors de noire 
enquete avaient miraculeuse- 
ment reussi s passer a travers 
les mailles du filet, on ne peut 
pas tout voir ! 



DEUX SUPER-CONCOURS PERMANENTS 

20 000 francs de prix au MEILLEUR LOGICIEL du MOIS et un VOYAGE pour 2 
personnes en CALIFORNIE au meilleur logiciel du TRIMESTRE. 



Un concours de plus! 
Rien de bien original dans 
cette lormule, pourtant nous 
essayons de faire quelque 
chose de different: nous orga- 
nisons un concours perma- 
nent tous les mois et tous les 
trimestres! Et avec des prix 
dignes des programmes que 
vous allez nous envoyer! 
De plus, ce seront les lecteurs 
eux-memes qui voteront pour 
leurs programmes preferes 
sur la grille recapitulative 
mensuelle. 

Pas de jury, pas de decision 
arbttraire, HEBDOGICIEL n'ln- 
tervenant que dans le choix 
des programmes qui devront 
etre ORIGINAUX et FRAN- 
CAIS. Si votre programme 
n'est pas tout 3 fart au point, 
un de nos specialistes vous 
dira comment I'ameliorer pour 
pouvoir nous le proposer a 
nouveau. 

Pour participer, il vous sutftt 
de nous envoyer vos pro- 
grammes accompagnes du 
bon de participation ainsi que 
toutes les explications neces- 



saires a I'uttlisation de ce pro- 
gramme. 
Bonne chance! 
Reglement: 

ART.1: HEBDOGICIEL organise 
de faoon mensuelle et trimes- 
trielle un concours dote de prix 
recompensant le meilleur logiciel 
du mois et du trimestre. 
ART.2: Ce concours est ouvert 
a tout auteur de logiciel quelque 
sort le materiel sur lequel II est 
realise. L'envoi d'un logiciel en 
K7 ou disquette accompagne 
d'un bon de participation de- 
coupe dans HEBDOGICIEL 
constitue I'acte de candidature. 
ART.3: U redaction d'HEBDO- 
GICIEL se reserve le droit de 
selectionner sur la base de la 
qualite et de loriginalite les logi- 
cieis qui sont publies dans le 
journal. 

ART.4: Ce sont les lecteurs qui, 
par leur vote, determinent les 
meil'eurs logiciels mensuels et 
irimestriels. 

ART.5: Le prix alloue pour le 
concours mensuel sera remis au 
plus tard un mois apres la clo- 
ture du concours mensuel. 



ART.6: Le prix alloue pour, le 
concours trimestriei sera remis 
au plus tard un mois apres la 
cldture du concours trimestriei. 
ART.7: Le present reglement a 
ete depose chez Maitre Jauna- 
tre 1 rue des Halles 75001 
PARIS. 

ART.8: HEBDOGICIEL se re- 
serve le droit d'interrompre a 
tout moment le present 
concours en avisant les lecteurs 
un mois avant. 

ART.9: La participation au 
concours entraJne lacceptation 
par les concurrents du present 
reglement. 

HEBDOGICIEL: 27 rue du Gal 
Foy 75008 PARIS. 

Sera declare gagnant le pro- 
gramme qui aura obtenu le 
plus fort pourcentage de vote 
par rapport a la totallte des 
programmes recus pour un 
meme ordinateur. 
Ainsi, pas de tavoritisme pour 
les ordlnateurs plus pulssants 
ou tres diffuses. 



BON DE PARTICIPATION 



Nom 

Prenom 

Age Profession 

Adresse 

N telephone 

Nom du programme 

Norn du materiel utilise 

declare etre lauteur de ce programme qui nest m une imitation ni une 
copie dun programme exislani Ce piograrr.ine reste ma propnete et 
j autonse HEBDOGICIEL a le publier La remuneration pour les pages 
pub'iees sera de 1000 francs par page lun programme n occupant pas 
une page emiere sera remunere au prorala de la surface occupee) 

Signalure obiigatoire 

(Signature des parents pour les mmeurs) 

Le programme doit etre expedie sur support magnetique (cassette ou 
disquette) accompagne dun descnplit detaille du materiel utilise. 
dune notice d*utilisation du programme Les supports des program- 
mes public, sont conserves, n oubhez done pas d'en faire une copie 




derniere minute ... 

DECOUVERTE D'UN 
GISEMENT DE COULEUR 
SUR TQ7. 70 ! 




% 



+ 




f 



-bon de commande- 



NOM: 

ADRESSE: 

Code postal: 

Adresser ce bon et un cheque de 133 Frs a Entreprlse Intormatlque 

73 bid Richard Lenoir 7501 1 PARIS 




APPLE 

VENDS APPLE 11+ 64K + 1 
drive + moniteur vert + 
controleur + carle langage. 
RS232C. couleur. synthetis- 
seur de parole + nombreux 
sods et joystick: 9000 F, David 
CLOUGHER Tel: 760 87 86. 

VENDS Base 48 + minuscules. 
4500 F, VENDS Disk II d'APPLE 
+ carte controleur : 3000 F. 
Christian LAROSE Tel: (71) 02 
26 14 (apres 19 H). 

CHERCHE logiciel pour la pro- 
grammation en assembleur ou 
une carte langage assembleur 
(si elle existe} David MERLOT 
Tel: (94) 43 26 10 ECHANGE 
Carte Langage 16K APPLE 
centre soit un drive, une carte 
80 colonnes, une souris. Laurent 
AELION Tel: 958 34 97. 



ATARI 

VENDS ATARI 2600 VCS + 5 

cassettes - 1 tele NB : t600 F. 
Tel: (4) 405 77 24 (apres 18H) 
60000 BEAUVAIS. 

VENDS ATARI 2600 + 5 car- 
touches + 4 poignees : 800 F 
Tel: (84) 75 13 18. 

Enseignant RECHERCHE pro- 
grammes pedagogiques pour 
ATARI 800 ou 800 XL (pour 
classes primaires). B. LECOUR- 
TOIS 54 rue des Alpiiies Appi 
39 80000 AMIENS. 



CANON 

VENDS CANON X 710 4 cou- 
leurs ; 1500 F. + carte XM 100 
4K: 320 F. + carte fichier 380 F. 
+ 1 livre X07 Jeux el program- 
mes {valeur 110 F.) Vendu 70 F. 
Alain VIVAU La Plei'ade rue 
Basse 30360 VEZENOBRES. 

VENDS CANON X07 + impri- 
mante + carte memoire XM 101 
* adaptateur secleur AD 4 + 
un livre de programmes de jeu 
"fades vos jeux avec canon X07" 
Le tout avec carton d'emballage, 
housses d'origine, manuels 
d'origine et le tout sous garantie 
pour 4000 F. Martin MASSOT 
Tel: 976 35 59 (apres 17H). 

VENDS configuration complete 
CANON X07 comprennant: 
Unite centrale de 16 Ko RAM + 
carte memoire de 8Ko + carte 
fichier + 9 K7 programmes de 
log/stick + 1 K7 de 50 program- 
mes divers + listings + livres et 
documentations + cable ma- 
gneto f imprimante graphique 4 
couleurs + adaptateur secteur 
pour X07 et X710 * housse et 
emballage d'origine Prix interes- 
sant a debattre. Monsieur RA- 
MEFISON 1 1 rue de Norvege 
44000 NANTES Tel: (40) 47 88 
92. 

COM. 64 



VENDS COM. 64: Flight simula- 
tor II: 250 F., SC's Quest for 
Times (disk): 150 F. Chess 
Odessa: 100 F.. Tool 64: 250 F.. 
Pitfall (K7): 50 F. Pascal 
GRANGE Tel: (75) 04 78 57. 
(apres 18H). 

VENDS pour CBM 64 K7 de jeu. 
Hero: 130 F.. Star fight: 140 F.. 
Chiller: 40 F.. Space Walk: 40 F. 
VENDS autoformalion au basic: 
200 F. Monsieur ALLENBRAND 
5 rue du Manege 68100 MUL- 
HOUSE Tel: (89) 45 33 37. (le 
mefcredi, samedi apres midi ou 
dimanche). 

VENDS COM.64 Pal t Secam + 
livres d'utilisations + magneto i 
nombreuses K7 de jeu + As- 
sembleur / desassembleur + 1 
manette spectravideo. Le tout 
3200 F. 4 T6I6 NB UHF VHF: 
500 F. Olivier POTONNIEE 2 
carrefour croix rouge 75006 
PARIS tel: 548 29 70. 



RECHERCHE programmes de 
gestion de compie en banque et 
budge! familial Monsieur MON- 
CHAUX 7 rue Camille Blanc 
95190 GOUSSAINVILLE Tel: 
(3) 988 48 52 (apres 17H) 

ACHETE CBM 64 + lecteur de 
K7 pour 2500 F. Maximum 4 
tout livre sur le CBM 64 et 
echange progammes Visoud SI- 
SOUK 40 rue Edouard Vaillant 
93170 BAGNOLET Tel: 859 69 
01. 

VENDS COM, 64 Secam I Peri- 
tel + magneto + guide auto for- 
mation + manettes 4 livres + 3 
cassettes: 3000 F. Nicolas 
GRIMM Tel: 296 14 41 (heures 
bureau) ou (3) 033 18 38 (apres 
19H). 



ORIC ATMOS 

VENDS ORIC Atmos 48 Ko 4 
22 K7 + 14 jeux en basic 4 4 
revues. Le tout 3500 F. a debat- 
tre (valeur 4800 F.) Olivier 
BOISSEAU 9 Vallon de Caionne 
33360 LATRESNE. Tel: (56) 20 
56 05. 

VENDS One Atmos 48K Ram 4 
Pentel * Synth. Vocal ORIC + 
Moniteur vert TP 200 + 110 lo- 
giciels + 3 manuels. Le tout 
3300 F. Patrick HENRY 105 
avenue Aristide Briand PARON 
89100 SENS Tel: (86) 65 01 64. 

VENDS Oric Atmos + magneto 
+ 7 K7 + 7 livres + 1 K7 
enreg. + Cable Din / Jack el 
cable DIN'DIN pour magneto. : 
3800 F. a debattre. Thomas 
80USSER 57500 ST AVOLD 
Tel: (8) 792 61 97 (apres 17 H 
15). 

VENDS ORIC 1 + 100 jeux + 
plusieurs livres de I'assemblage 
du 6502.: 1500 F. Le tout 1500 
F. VENDS aussi GP 100 A + in- 
terface pour ORIC : 2000 F. De- 
mander Emmanuel au 831 21 
08 (entre 19 H et 20 H). 

VENDS ORIC Atmos 48K 
complet en Peritel + K7 de- 
monstration + manuel + livre + 
2 manettes de jeu: 2000 F. 
Jacky PAIVA Tel: (59) 51 16 28 
(Pyrennees Atlantiques) 

VENDS ORIC 1 48Ko + Peritel 

+ alim. + Secam NB 4- cable 
magneto 4- manuel ->- Oric pour 
tous + programmes: 1800 F. 
Monsieur MICHENET 81253 
Square de Touraine 36100 IS- 
SOUDUN Tel: (54) 21 35 40 
(heures des repas). 

VENDS Oric 48K + Peritel 4- 
alimentation 4- 25 jeux 4- nom- 
breux programmes + livres + 2 
K7 initiation au basic 4- 2 joys- 
ticks 4 interface + magneto 
compatible 4- cordon raccorde- 
ment.: 2500 F. a debattre. Mon- 
sieur GRANGE 1 6 residence 
des Acacias 91540 MENNECY 
Tel: 457 26 18. 

VENDS ORIC 1 reclifie 4- mo- 
dulateur NB 4- Peritel + Alimen- 
tation + K7 4- livres. Le tout 
2000 F. J. Christophe GARNIER 
Tel: 254 83 92 (de 18 H 30 a 19 
H30). 

ACHETE ORIC Atmos Pal t 
magneTo ou modulateur NB (si 
possible): 1500 F. ou CBM 64 
pal au meme prix ou bien VIC 
20 + magneto: 1 100 F. S. GUE- 
GAN Route du Hayo Saint Thu- 
riau 56300 PONTIVY Tel: (97) 
39 84 88 (apres 17 H). 
VENDS ORIC 1 *- cordon alim. 
V manuel + livres + 10 Mi- 
cr'Oric + 100 jeux: 1800 F Tel: 
543 37 20. 

SHARP 

VENDS pour PC 1245. PC 
1251. PC 1401 Imprimante I in- 
terface K7 CE 126P: 650 F. 
Serge SCHANG Tel: (40) 33 13 
33 (apres 18 H 30) 44230 St 
SEBASTIEN SUR LOIRE. 

VENDS PC 1245 sou-, oarantie 
500 F. M arc ALEXANDRE 33 
rue R Wagner 02100 ST 
OUENTIN Tel: (23) 64 16 33. 
VENDS PC 1251 V manuel ins- 
tructions 230 pages: 800 F. 
Monsieur BONENFANT 49 
place de la Mairie Jouy le Potior 
45370 CLERY ST ANDRE Tel: 
(38) 88 75 08 (heures bureau). 

VENDS Sanyo PHC 25 < sylhe- 
liseur de son t manettes de jeu 
+ cable magneto + cable Peri- 
tel 4 10 logiciels.: 2000 F. le 
lout Monsieur TIBI Tel: 775 32 
50. 



TEXAS 

VENDS Tl 99 4A t- magneto + 
cordon t- 1 module Parsec t 1 
module Retour du pirate + K7 
jeu retro II. la tombe du sorcier 
(2 parlies). Goll (2 parlies). Bil- 
lard. PPCM et PGCD (K7 4 par- 
ties) 4 manettes de jeu i nom- 
breux livres de programmes + 
K7 le basic par soi-meme. Ofdi- 
nateur livre dans emballage 
d'origine t- livres accompagnant 
+ nombreux programmes sur 
K7. Le tout (valeur 4000 F.) 
Vendu 2500 F a debattre. Ste- 
phane BATTISTELLA 75 bis fue 
Michel Ange 75016 PARIS Tel: 
651 34 91 (apres 16 H 30). 

VENDS pour Tl 99 jeux et pro- 
grammes pour lordinaleur fami- 
lial Texas Instrument Tome 1 et 

2 + la cassette du basic par soi- 
m£me 4- Tl Invaders + Munch 
man 4- chisholm Trail 4- jeu 
video 1 4- blackjack el Poker + 
les nombres magiques. Le tout 
en bon etat: 1465 F. (possibilite 
vente detail) Regis ESCALONA 

3 bid Eugene Delacroix 65000 
TARBES Tel: (62) 93 62 59. 

VENDS Tl 99/4A + cable 4- ma- 
gneto 4- module Munchman + 
K7 programmes 4- 2 livres: 1200 
F. G. BOIRON 15B rue P. Curie 
42240 UNIEUX Tel: (77) 61 62 
73. 

VENDS Tl 99'4A console + pe- 
ritel 4- cordon magneto CS 1-CS 
2 + manuel + basic etendu + 
manuel et cassette 4- paire de 
joystick le tout: 2000 F. Jeux et 
programmes pour Tl Tome 1 et 
3: 110 F. Pratique de I'ordina- 
teur Tl Niveau 2: 45 F. La 
conduite du Tl 99: 50 F. 2 n° 99 
Magazine + 4 K7: 160 F. 7 n° 

99 magazine et revue ameri- 
caine: 175 F. module Parsec: 
200 F. Boitier d'extension peri- 
ph§rique: 1300 F. Carte RS 232: 
900 F. Cordon parallele GP: 100 
F. J. Paul DUPONT Tel: (85) 34 
44 47 (71000 CHARNAY LES 
MACON). 

VENDS Tl 99/4A 4- manettes de 
jeu + magneto K7 + modules + 
cassettes Pirat. Jeux retro I et II 
Assembleur 4- nombreux logi- 
ciels sur K7 4- importante docu- 
mentation: 3000 F. Gerard PES- 
OUE 59242 TEMPLEUVE Tel: 
(20) 91 65 66 ou (20) 79 21 41. 

VENDS Tl 99/4A + modulateur 
+ manettes + magneto K7 avec 
cordon 4- module Basic etendu 
4- Basic et BE par soi-meme + 
aide a la programmation I 4 
gestion privee 4 gestion de li- 
chiers 4- Tl caique 4- parsec + 
football 4 Carwars + jeu video I 
4- magie des nombres + 2 
livres (50 programmes et jeux et 
programmes BE 4 poste tele 
NB (Valeur 6000 F.) Vendu 
4500 F. Monsieur OUERE Tel: 
(4) 458 86 52 (apres 18 H). 
VENDS pour Tl 99'4A nombreux 
modules neufs sous emballage 
d'origine: 200 F. piece + K7 
Tombe du sorcier. Billard et 
Golf: 75 F piece. Didier DE- 
VOGE 54280 SEICHAMPS Tel: 
329 00 24. 

VENDS manuel Basic etendu en 
frangais: 40 F. + livre "Jeux et 
programmes pour lordinaleur fa- 
milial Texas Instrument Tome 2: 

100 F. Pierre BUTT1NI 8 rue du 
Maine 69330 MEYZIEU Tel: (7) 
831 74 50 (apres 18 H). 

VENDS Tl 99/4A + cable K7 4 
parsec 4- Tl Invaders * biasto 
4 Car wars t Tombstone city i 
livres de programmes. Le tout 
2000 F. Thierry GROS Tel: (7) 
855 00 82 (apres 18 H), 

VENDS Tl 99.4A i Penlel I 
adaptateur i cable K7 f K7 + 
manuels: 1000 F. Mini memory 
i K7 demo. * Livre initiation a 
I'assemhleur: 600 F. Interface 
Secam: 500 F. David GEL- 
DREICH 18 rue Chateauneul 
06000 NICE Tel: (93) 96 75 26 
(apres 18 H). 

VENDS pour Tl 994A mmime- 
mory 4 manuel francais Shift: 
891 F. i burger time. Speech 
Editor: 215 F I cars wars, M 
Invaders. Z Erozap; 160 F 
piece t Musicmaker: 289 F. i 
2 K7: 90 F I livres I revues: 
17 F RENZO CALOGERO 28 

101 le gat 31490 PI8RAC Tel: 
(61)86 02 75. 

VENDS Tl 99/4A t basic 
etendu 4 magneTo t- cordon t 
adaptateur pal Secam 4 adap- 
tateur Peritol i manettes * 2 
cartouches t- 61 jeux en K7 t 
50 programmes: 2000 F Tel: (7) 
824 98 35 (le soir) 69006 LYON. 



VENDS Tl 99 4A i cordons - 
manettes • basic etendu - mo- 
dules I livres el revues 2000 
F. Mimmemoire Prix a debattre 
Olivier CADAERT 8 avenue des 
Tilleuls 78320 LE MESNIL ST 
DENIS. Tel: 461 81 60. 

VENDS pour Tl 99 4A: Mini me- 
moire + manuel en francais Tl 
LOGO: 750 F chacun • RS 
232C + TE2: 2600 F - gyn- 
these vocal + Speech Editor 
1800 F. Lot indivisible sur mo- 
dule. Parsec: 200 F.. Munch 
Man: 200 F., Trombstone: 150 
F.. Car wars: 200 F.. Blasto: 200 
F.. Tl Invaders: 200 F. 
Wumpus: 150 F. Bruno MOME- 
RENCY 33 avenue Paul Bert 
92190 MEUDON Tel: 534 85 13 
(avanl 20 H). Le week end. 

VENDS pour Tl 99.4A mini me- 
moire (valeur 500 F.) + manuel 
initiation au langage assembleur 
(valeur 1099 F.) Vendu 450 F. 
Le tout. G. LOISON Tel: 080 27 
07 (91580 ETRECHY). 

VENDS Tl 99/4A + peritel + 

manuel 4- cordon magneto 4 
Pasec. Tombstone city. Othello 
(modules) 4- manettes de jeu + 
programmes divers sur casset- 
tes: 2200 F. Le tout. Pascal 
BOUVERON 94550 CHEVILLY 
LARUE Tel: 687 15 36 (apres 
17 H). 

VENDS Tl 99/4A 4- magneto K7 
4- Manuels: 1000 F. Monsieur 
BIELIAUSKAS 94270 LE KREM- 
LIN BICETRE Tel: 726 43 76 (a 
partir de 18 H). 

VENDS Tl 99/4A + 25 jeux + 1 
module + 1 livre de program- 
mes + cordon K7 + paire de 
manettes de jeux 4 livre de de- 
monstration: Prix interessant. 
Tel: (31) 79 83 97 (14320 MAY 
SUR ORNE). 

VENDS Tl 99/4A + cable K7 + 
manettes de jeu 4- synthetiseur 
de parole 4 K7 basic par sot- 
mime 4- module Echecs + par- 
sec 4- Alpiner + slatistiques + 2 
livres (valeur 3200 F.) Vendu 
2400 F. Monsieur NGUYEN Tel: 
581 66 48. 

VENDS Tl 99/4A 4- synthetiseur 
de parole + Basic etendu + K7 
Basic et Basic etendu + jeu 
d'entreprise + livres de pro- 
grammes f joysticks + parsec 
4 Pole position 4- Rubis sacre 
+ cordon magneto 4- prise peri- 
tel (en option 300 F.) Le tout 
3500 F. F. DOUCHEZ Tel: 630 
54 25. 

VENDS Tl 99/4A 4- cable ma- 
gneto 4- manette de jeux 4- Dot- 
tier extension 4- carte 32K + 
unite de disquettes sans carte 
controleur 4- extended Basic + 
module gestion fichiers t- ges- 
tion prive 4- Ti Calc 4- music 
Maker + car wars + 5 K7 + 
livres 50 programmes pour Tl. 
Le lout 6000 F. Tel: (7) 890 20 
96 (apres 19 H) Christian JOLY. 

VENDS pour TI99/4A Parsec + 
Driving demon + 5 "99 maga- 
zine" 4 livres "jeux el program- 
mes pour Tl 99'4A Tome 2 et 3. 
Le tout 860 F, J. Maxime BEL- 
MESSIERI Le Puisat 73240 ST 
GENIX I GUIERS Tel: (76) 31 
85 90 le samedi [N.D.L.J.C.: 
C'esl soit 90 ou 30 car e'est pas 
tr&s lisible alors essayez les 2 
vous verrez bien !) 

THOMSON 



CHERCHE logiciels astrologi- 
ques et tout autre logiciel sur art 
divinatoire sur TO 7 70 Mon- 
sieur DARMON Tel:(91) 75 74 
20 (apres 20 H). 

VENDS pour TO 7 Zaptrac, 
Chasseur Omega , Meteo. Pul- 
sar 2, Roger et Paulo, Pingo : 
50 F. piece. Nicolas RIEUCAU 
1 1 residence des Longuos 
Raios 95330 DOMONT Tel: 991 
80 63 (apres 18 H), 
VENDS ou ECHANGE conlre 
TO 7. Vecttex i 7 cassettes + 
crayon optique (valeur 3500 F.) 
Vendu 2200 F. S6baslien 
HOUSSIN 2 rue Jules Valles St 
Etienne du Rouvray 76800 
(ROUEN) Tel: (39) 66 77 84. 

VENDS TO 7 i cart, basic 1 C. 
JENGER Les Pugots Bat K2 
06700 SI LAURENT DU VAR 
Tel: (93) 07 73 43. 
VENDS TO 7 i basic t Exten- 
sion 16 Ko i cartouche Pictor 
i K7 Budget familial: 3200 F. 
Patrick PRADES I S E S 
d'Aniane 34150 GIGNAC Tel: 
(67) 57 43 73. 



BOURSE DE LA MICRO 

6 rue Rodier 75009 PARIS Tel.: (1) 285.07.44. 



LA PREMIERE BOURSE CONSEILLE 

MET A VOTRE DISPOSITION MATERIELS GARANTIS. 

SON DEPARTEMENT VENTE O'OCCASION, 

SON SERVICE DINITIATION ET DE FORMATION. 

SA SALLE DE DEMONSTRATION POUR ESSAIS ET TESTS. 

NOS OCCASIONS SELECTIONNEES 



APPLE ME 


Version de base 
Lecteur Neuf 


10000F 


LOGABAX LX 500 


- Disk LX 529 
DF.DD. 500 Ko 


11 000 F 


DRAGON 32 


Joystick - Docs - prgs 


1 900F 


LYNX 96K 


nu 

+ logiciels + livres 

4 magneto 


1 200 F 
1.500 F 

1 800 F 


TO 7 




2 000F 


SHARP EL 5500 II 


Joystick * prgs 


750 F 


SHARP PC 1500 


+ CE 150 + CE 158 


5.000 F 



4- magneto + Prgs 
ZX81 + Clavier + buffeur clavier 280 F. 

+ MGR - 64K + magneto 

+ Prgs 
KOALA PAD CBM 64 - log +- lecteur Disk nous consulter 

Extension APPLE nous consulter 

REPRISE DE VOTRE ANCIEN ORDINATEUR 



VENDS TO 7 4 16K 4 Basic +■ 
magneto 4- cartouche Gestion + 
K7 dietetique + coktaii jeux 4 
nombreux jeux + livres 3200 F. 
Michelle ELGHIAT 1 Square 
Hector Malot 92350 LE PLES- 
SIS ROBINSON Tel: 537 06 53. 

VENDS TO 7 + basic 2000 F, 
4 16K: 300 F. t- magneto: 350 
F. Le tout 270 F. avec K7 de 
jeux. Eric FERRAND Dussin St 
Clair de la Tour 381 10 La Tour 
du Pin Tel: (74) 97 18 44. 



TRS 80 

VENDS compatible PC 1211 + 
Imprimante + lecteur de K7 4 
livre 4 notice 4 programmes: 
1000 F. Marc ALEXANDRE 33 
rue R. Wagner 02100 ST 
OUENTIN Tel: (23) 64 16 33. 

VENDS TRS 80 modele 1 ni- 
veau 2 16K + assembleur 
EDASM + livres mars 82 : 3000 
F. Jacques MAIRE Cursay sur 
Dive 86120 Les Trois Moutiers 
Tel: (49) 22 66 29. 

VENDS TRS 80 mod6le 16K i 

moniteur video t magneto t 
plusieurs K7 4- livres: 4000 F. 
Ivan SOULIER 84 grande rue 
25000 BESANCON Tel: (81) 83 
28 51. 

RECHERCHE carte RS 232C a 
incorporer dans interface expan- 
sion. Echange programmes 
(support diskette) JF OZBOLT 8 
place de la Mairie 58450 
NEUVY / LOIRE. 

VIC 20 

VENDS VIC 20 4 magneto + 
55 programmes sur K7 4 2 car- 
touches de jeux 4- ext. 16 Ko: 
2900 F. (valeur 3900 F.) Mon- 
sieur COLOMBAN n° 73 VIL- 
LARD St PANCRACE 05100 
BRIANCONTel:(92)21 39 59. 
VENDS VIC 20 + interface NB 
4 Data K7 + cartouches: Sar- 
gon. Avenger. 4 autoformatton 
au Basic + nombreux program- 
mes 4 livres et revues: 1800 F, 
Yoel ATTIAS 8 rue Raymond 
Pilet 75017 PARIS. Tel: 731 01 
74, 

VENDS VIC 20 SECAM sous 
garantie 4 extension 8K t 4 
livres pour VIC 4 nombreux lo- 
giciefs. Le lout 2000 F. Monsieur 
DEL FORTE 39 rue Ansclme 
93400 ST OUEN Tel: 606 40 
77. 

ZX81 

VENDS ZX 81 i TV 4 antonne 
TV + 16K f magneto + cor- 
dons I 2 livres i quolques pro- 
grammes. Le tout tOOO F. (va- 
lour 1200 F.) Florian GALTIER 
Tel: 548 07 87 (apres 18H). 

VENDS ZX 81 i 16 Ko t cla- 
vier mecanique t inlerrupteur i 
cordons 4 15 K7 t 6 livres i 
manuels. Le lout 1500 F (Va- 
lour 1900 F.) Monsieur CEDRIC 
50 route de Veulottes 76450 
Tel: (35) 97 88 43 (apres 19 H 
02) 

N.D.L.J.C.: En via un qui scroti 
malin ol qui devrait Iravaitlor ,i la 
SNCF. 



VENDS ZX 81 +■ manuel - livre 
"ZX 81 a la conquete des ieux": 
325 F. Monsieur LtGONNIERE 
(VAR) Tel: (94) 33 74 02 (apres 
18H). 

VENDS ZX 81 4 16K * manuel 
4- 9 K7 jeux + 2 ordi 5 4 2 
livres. Le tout 800 F. VENDS 
Tilt. Voire ordinateur, Electrom- 
que pratique: 10 F. piece. Ludc- 
vicTHIRIONTel:415 41 29. 

VENDS ZX81 4 16 K + clavier 
ABS + 3 K7: intercepted Co- 
balt. Echec, Tiranosaure rex (en 
3D) : 1300 F. Monsieur BETTAN 
3 all6e Beauseiour 94230 CA- 
CHAN 

VENDS ZX 81 4 32 Ko + cla- 
vier ABS + 6 livres 4 6 Ordi 5 
4- 60 programmes 16 K 4- 50 
list 16K : 1400 F. 4- magneto 
K7: 400 F. F. LEPEUTRE Si 
Urlo Languidic 56440 Tel: (97) 
65 23 77. 

VENDS ZX 81 + carte sonore 
+ 16K i- magneto + clavier 
ABS 4- tele NB 4 8 cassettes 
jeux 4 documents: 2300 F, 
Thomas SANSONETTI Tel: 995 
03 19. (95150 TAVERNY). 

VENDS ZX 81 16K 4 carte gra- 
phique Ouicksilva t- TV NB l- 
logiciels 4- livres: 1500 F. 
Thomas JODER 8 avenue du 
General Adeline 91170 VIRY 
CHATILLONTel:996 57 60. 

VENDS ZX 81 i 16K t Carte 
graphique + interface manelte 

i joystick spectravideo + 
nombreux logiciels et listings 

+ livres, prix a debattre. 
VENDS jeux electroniques 
Logic 5. Jean Marc SALIS Tel: 
(61) 09 61 79. 

Deux classes de cours prepara- 
toires de la banlieue nord chor- 
chent ZX 81 petit prix pour initia- 
tion precoce. Gabriel AKIF lei: 
994 52 91 (apres 17H). 

DIVERS 

Jeune hommo passionne d'6lec- 
tronlque et dinformatique. do* 
pourvuo de moyens. chercho 
gbnercux donateur de lout ma- 
teriel informatique meme hors 
d'usagc. Frais d'envoi rembour- 
ses. Thierry MONTEILLET 2bis 
rue d'Allkirch 67100 STRAS- 
BOURG tel: (88) 84 90 07. 

VENDS ordinateur de jeu C52 
Philips + Glouton et Voraces I 
Football eloctroniquo 4 Hockey 
electronique 4 le monstro de 
l'espace t- les satellites atta- 
quonl i labyrintho i suporlogi- 
que i Hipper oloctrontqiie I 
Identification i Rondez-vous 
spatial i logique t nombreuses 
voriantes (valour 3000 F.) 
Vendu t200 F, VENDS pratique 
du VIC (periphenquo et gestion 
do fichiers): 50 F. CHERCHE 
livres et programmes pour CBM 
64 a prix interessant. J.Michel 
BOSO 42 bid Vaucanson 13009 
MARSEILLE. 

VENDS interface CGV PHS 
60CA univorsolle Peritel An- 
lenno T6I6 Secam pour micro 
ordinateur sur lolevisour sans 
priSO Penlel : 250 F Philip MA- 
CK1NNEY 127 ruo do la Falser 
derio 75116 PARIS Tel: 503 01 
48 {le soir et le Week end) 



&£Mmm 




DEMANDEZ LE PROGRAMME soft-parade 



Achetez vos logiciels les yeux fermes, nous les avons testes pour vous ! 

Nous avons selectionne pour vous les meilleurs logiciels actuellement disponibles en France. Nous ne 
pretentions pas que cette liste est complete et definitive et il est evident que nousyrajouterons regulie- 
rement des programmes. Pourtant, vous chercherez en vain certains programmes quijouissent d'une 
bonne reputation et qui se vendent surtout grace a la publicite et aux conseils des vendeurs quinepeu- 
vent pas connaitre tous les logiciels disponibles. 

Les prix sont, nous I'esperons, les meilleurs du marche et les abonnes - anciens ou nouveaux - benefi- 
cient en plus d'une remise de 10 %. Si vous etes nombreux a nous suivre dans cette experience nous 
pourrons rapidement arriver a faire baisser les tarifs des fournisseurs pour atteindre I'objectit que nous 
nous sommes fixe: ramener les prix a une plus juste valeur ! 

Les classements sont faits en fonction de I'interet du programme et ne tiennent pas compte des prix, 
c'esta vous dejuger de I'opportunite de la depense. N'oubliezquand meme pas que si le rapport quali- 
te/prix est mauvais, le logiciel ne peut figurer dans cette page ! 




Si vous etes ABONNE, 
dddulsei VOUS-MEMES 
vos 10 % de REMISE 
sur la Don de commando. 
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nouveau . 



RAID OVER MOSCOW 



WHISTLE R' S BROTHER 



LORDS OF MIDNIGHT 



SPELUWKER. 



BEACHHEAD 



DECATHLON 



UHDER WURLDE 



REALM OF IMPOSSIBILITY. 



RADAR RAT RACE 




REVENGE OF THE MUTANTS CAMELS 

HOVER BOWER 

petwnne ne la londe el quo nwpouvi:; -.• 
ZENJI 



R ROBOT AMD HtS ROBOT FACTORY 
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AMBULANCE 

FaflVMI 11 .out laudia pouilanl p'aienuilt la -Un el .»cu 
<laa pom let dUpoier » I'Kflpilal El dapacha/ „ou«. 
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S SUttUtfl 0AHF« 

BCA.OANOIAH 



I FUCHT SnAJLATOR > 



COMMODORE 64 



t strvEH cttcs or r.01 r> 

5 RAO OVER MOSCOW 
S SUMMER GAABES 
/ OHOST BUSTERS 



5 MASK Of THE SUW 



3 FORT APOCALYPSE 

3 [JFVEJtCF OF IKE MUT 

« HOVTR BOWEB 



MODULE 
MODULE 

Moowr 



LEVOYAGEUROU TEMPS 



| ,, l ,,,l.,n..,,!r(i.ni U i'iiii.|. 



ORIC I / ATMOS 



I TEMORC POUlin 
IttBMINUS 



COHTHAMf. TOUS CIS LOOtCWLSSi 



' SPACE SHUTTLE SIMULATOR I'.". ■■ ■ 



OACKdAMMOM 
ZX81 




PUBUCITE 




paammmt 



H6 oui, de la pub I i cite dans Hebdogiciel, nous rentrons dans le rang? Vous rigolez ou 
quoi? Les annonceurs que vous voyez la, id, dessous se sont engages a faire 5 % de 
remise aux abonnes de I'hebdo sur TOUT le magasin, y compris sur les ordinateurs, les 
fournitures et les peripheriques. C'est pas de la bonne publicity, ga, Madame? 




grand chou de logiciels v<? <}* *\\ 

Itbraine specialisee . , \9>\ 

nos PRIX "SERVICE COMPRIS" X .^.^ 




. THOMSON-M05-T07.70 
. POINT CONSEIL TIFY 
. MSX - YAMAHA - SANYO 
. LIBRAIRIE 



£ S commodore 

BSI CB s 

LJIiJ I aECTROMCS coiecovisi 



iindair - 

mm 



29, rue Pailloi de Montaben 

10000 TROYES 

Tel. (25) 73.28.49 



VIDEO 107 INF0RMATIQUE 
♦ ♦ ♦ ♦ ♦ 



PLACE DES FETES 
75019 PARIS 



QL SINCLAIR DISPONIBLE 

COMMODORE, ORIC, AMSTRAD 

EXELVISION 



Tel. : 201.46.09 



ARVERNE 
IIMFORMATIQUE 



. Vente de miero-ordinateurs familiaux a 
partir de 580 Francs dont SINCLAIR, AMS- 
TRAD, THOMSON, APPLE... 

. OFFRE SPECIALE DE NOEL : 5 % de remi- 
se pour toute commande passee avant le 
31 Decembre 84. 

ARVERNE INFORMATIQUE 

99 bis Avenue Max Dormoy 

63000 CLERMONT 

|73) 83.11.10 



VIDEO TROC 

VENTE - ECHANGE - DEPOT DE 

TOUT MATERIEL VIDEO ET MICRO- 

INFORMATIQUE - LOCATION DE JEUX 



NOS PRIX NEUFS ! 



({>\I\IODORE64:2690F 
IMPRIMAeJTE C.64 : 1950 F 
MOeJTTEUR COULEVR : 2590 F 
ATARI X00 XI SECAU : 2290 F 



I.ECTEUR DUQUETTE : 2S90 F 
MOHITEUR ECRAX AMBRE : 950 F 
MSX CAXtW V 20: 2990 F 
AMSTRAD : 2990 F 



OUVER TDV MARDI A U SAMEDI DE 10 It A 19 II 00 
LE LUNDI : DE 14 H A 19 H 

89 bis. we lie Chofcnlon 75012 PARIS 
lei. : 342.1s it 

metro : Rare tie Lyon. l.edru Rollm 



$ ► ^ o ^ *°° 

f <f / <f <? / J? ^ 
GRAND CHOIX DE LOGICIELS 




NANTES 5 Rue Lekain 

87 Quai Fosse 

ANGERS 7 Rue Boisnet 


Tel 89 71 26 
Tel 73 2167 
Tel 88 13 98 



INFORMATIQUE 
2000 

le specialiste de la micro- 
informatique familiale 

Nombreuses marques disponibles, 
Logiciels, livres, conseils. 

LE TRIANGLE - Niveau bas 
(67) 92.92.17. 34QOO Montpellier 



VISMO 

Vente informatique service micro ordinateurs 

ORIC, SINCLAIR, AMSTRAD 

Moniteurs couleur et N/B. 

Tous peripheriques 

ASSEMBI.EUR MONAMS 
Recommande par Hebdogiciel 

84. M Braumarchais 75011 PARIS 
12, bddeReullIy 75012 PARIS 

338.60.00 



ABONNES, 

si vous avez un probleme avec une de 

ces boutiques, vous savez a qui vous 

adresser? Je ne vous fais pas de des- 

sin? 



ANNONCEURS, 

vous avez envie de vous lancer dans 
I'aventure? Vous etes prets a consentir 
5 % de remise sur toute votre boutique 
pour la voir envahie de programmeurs 
fous? Ecrivez-nous, nous vous ferons 
payer tres Cher le centimetre carre de 
publicite! 



BLANC BERNARD 

Informatique Bureautique Lyon 

AMSTRAD - SINCLAIR - ORIC 

- SHARP - THOMSON - SANYO 

- LEANORD - LOGYSTEM 



9, rue Salomon Remach 69007 LYON 
Tel. : (7) 872.25.48 (pres facultes) 



Assistance technique. Logiciel. Formation 



HERCET 
MICR0-INF0RMATIQUE 



41, esplanade Flechambault 
(26)82.57.98 57000 flefms 



ORIC - SINCLAIR - MEMOTECH 
MSX (sanyo, yeno, yamaha...) 

Librairie et nombreux logiciels. 



un SPECIALISTE, c'est PLUS SUR et.. 
... c'est toujours MOINS CHER ! 



MICROMETZ 



micro - informatique pour tous 



ordinateurs personnels & professionnels 



compatibles : Zenith - Toshiba % vfi 



1 9. r. de la Fontaine 1^ 
5/000 METZ !■ 



Placa do n 
RepubiiqU 



<?* 



.-,*•■ 



la page pedagogique 



la page pedago~ 



Si un programme merite le qualificatif de pedagogique, c'est bien celui-la: lordinateur, par I'intermediaire d'un sympathique et patient 
personnage, se substitue parfaitement a un prof de maths. 



Mode d'emploi: 

Destine aux eleves de sixieme, ce programme d'excellente qua- 
lite, comprend 5 lecons et 10 exercices sur Ensemble Z, Tout est 
dans le programme. 
Adaptation: 

SCREEN: definition des couleurs de la fenetre de travail. 
BOX-BOXF: rectangle vide et rectangle plein, les coordonnees 
sont celles des sommets opposes. 
LOCATE: localisation du premier caractere d'une chaine. 
ATTRB: definition de la taille des caracteres. 
DEFGRS (X): definition de caracteres. 




Monsieur J. Yves LE FRIEC / 
nous propose les modification: 
suivantes pour son programi 
pedagogique MENHIR 
64 

21759 IT PKO£ THEN PRINT "... Mais vOUS n 

' auez pas uos deux pierres r>oires...le d 

ragsn se presente M ' 1 ' : G0T0378 

51755 PRINT" Vous leuez uos pier-res et 1 

e dragon ternfie s'enful tf 1' ":F0R 1 = 1 T 

I580:NEXT I 

S1766 CLS 



, Alain GASTINEAU 
» ' J I- 



SUITE DUN 66 





ENSEMBLE Z sur THOMSON TO7.TO770.MO5 



6: LOCATES, I :Xl»=lNPUTSU ) 

4320 IF XlfO*<" AND XlSO">" AND X1IO* 

= '• THE* COSUB 12680: G0T043 10 

4330 LOCATES. I :PRINTXl*:COLOR0,7:LOCATr--, 

.I:X2J=INPUT*<1)!IF X2*OCHRf<13) THEN 4 

310 

-:-..? :f cx<v and «*■"<•> or <x>y and xi 

!«">") OR CX=Y AND Xl*= n ="> THEN GOSUB I 

2030:RETURN 

4358 GDSU812028:P9=P9+-1:GOTQ4318 

44Q6 •H"'IU tlilIMM 

4482 '••* 10)EXERC1CE ••• 
4494 '.*.......'«..........«. 

MIC ::LORB,B:BOXFC0,0>-C27,23)" --G0SUS 

1281 8: L0CATE29, 6.0: PRINT *DmEME": LOCATE 
2?.7.0:PRINT"EXERCICE" 

■1412 COLO»2,0:LOCATE1, 1:PRIKT-Quels sont 
les no»bres":L0CATEl,2:PRINT"associes a 
un ito:/.ts-:LDCATEl,3:PRINT-A,B,C,D,E,F,G 
. H ? " 

4420 :OLOR7,0: F0RI=2T024: LOCATEI, S: PRIM 
T^P*.35.-.NEXTI:C0L0PI,e:L0CATE14,9:PRINT 
-0":COLOR7,8:LOCATE25,8:PRINTGR*<86) 

4430 1=1 

4431 IFI=9 THEN 4452 

4432 X<I>=INT<RND*16)-I:Z=RND 

4433 X(I)=X(I>*C2>.5>-:<(I>«(Z< = .5>: IFI = 1 
'HEX 4440 

4434 F0RJ=1T0I-1 

4435 IFX<I)=X<J) THEN4432 

4436 NEXT J 

4440 IF XU>>0 THEN L0CATE14+X<I>,7:PRIN 

-CHRIf64*-I):ELSE LOCATE 14+XC I ), 7- PRINTCH 

RJ<64*I) 

4J50 I=I*1-G0T04431 

4452 F0RI=1T03 

4455 C0L0P7, 0: LOCATE 1,11+1: PR INTCHRJt 64* 

~m L0CATE4, Il + I:Xlf=INPUT*(l>: IF XlfO 

1HPJM2- THEN L0CATE4, 1 1*I:PRINTX1 »: ELSE 

GOT04455 
4465 LOCATES, 1 1+1- X2t=INPUT*< 1 >s IF X2S=C 
HPC13/ THEN 4488 ELSE: IF X2*=CHR*<12) T 
HEN 4455 

4470 LOCATES, I1-I.-PPINTX2$:L0CATE6,8+I:X 
7I=:NP'JT»fl>: IF X3S=CHP*<I3» THEN 4439 E 
_$£:IF /3ISCHRSM2' THEN 4455 
4475 LOCATES, tl*I:PPINTX3*:LOCATE7,3+I,0 
.X4*-INPUTSU}1 IF' X4«OCHR*< 13> THEN 445 

■1433 ;:t=;-:is*x2s+/3s: if xif<>"+* and xik 
'-■ AM) A8S<VAL< C»»»ABSOC<IJ> THEN COS 
US .2866:G0T04455 

4435 IF yAL<X»)OXCI3 THEN GOSUB 12929:P 
1O=?10*1:GG-TO4455 
4498 GO'jUBI2039:HEZTI 

4496 M10=29-INT':£0*P10/8>:r110=-i110»<ni0-r 
0,:GO;uB129I9:LOCAT£29,6:PPINT"h - 0YEWNE:" 
:lOCATE31,8:PPINTM10:FOPI=1TO3880:N£XTI 

4497 IF HI9<19 THEM GQ5U8I2096 
♦498 RETURN 

5*90 roPI = ITO2009:NEXT:GOTO44]0 

......««..«••*<•*♦•«»•••••*■•■ 

9993 '•»» DEFINITION ASTEPIX •■* 

:-:-9? -**•*••*••***••*••••<<•*•>**•**• 

:<:'-}'■:■■> CEFGPc i . =24:, 241,248,248/252, 254, 
255.255SDEFGR*<2»»249,240,224,- 195,24. j. | 
.,144IDEFGft*<3 '=0.0.0,9,0.0.8,255 
19919 ['EFCPt' 4. =0,9, 9.9, 1,5.59,195 
18811 DCFGR*<5J<>255> 255, 259, 255,253,254, 

245.240 

--^i ; -192,192,129,129,9,8,9,9 

19813 C-EFGPJ. 7-=53. V.2£7.22^.22-.227,24 
7.24? 

IF ,;p I §.=255.255.255.255.255.255- 
252,240 
10015 D£FGPf9- = 255.255.255.252. I ■ . ■ . 



I EFM*( !9 


=224,240,290.5. ; . : . : . 


: :ij:" DEFCR-H : 1 


=0.9, 0.0,255-25^- ■ 


: : r GP»'l2 


=0- :, 6, 24. 224, 224. 224, 22 


19019 DEFGPI' 13 


= 64, 126.9,0.9,0,6,8 


:C-020 DEFGPJ' 14 


=152.232,232,249,240,232 


,249,244 




1882] C'EFGPi-15 


■20,2,7,31,83/(33, I2".S55 


lSc££ D£FGR*< 16 

5.255 

10923 DEFGRSM7 


=2. 14. 255. 255. 255. 255. 25 


-9,8,8,9,8,8, 129, 192 


10024 DEFGR*<20 


=2,2,2,4.4,3,16,32 


18825 !'Ef:pi :2] 


= 176- 174. 12'-, ;'•:-:■ 


.240,243 




:->&26 DEFGW22 


=9.0, 123,0.0,8,0.8 


1982 DEFGPI'23 


■8,8,8,8,9,8,6,. 


10023 [,€FGP*'24 


= 3, 1,8, 1, 1. 1, 1,2 


18829 DEFGR-M23 


=64. 1?2, 123.9.0,9,8,8 


18839 DEFGP*'23 


"16,8,4,4.2.2,2,2 


18931 £>EFGR*<29 


■232,248,240^227,284,144 


. .44, 144 




:.j8i2 DEFGPi. 30 


"63,7, 1, 128,96, 16, 


I0^3 DEFCR*' J1 


-251,235,233,232,232,232 


,186,64 




10034 DEFGPS'37 


-36,46, 46, 46* 46, 43, 47, 76 


10075 DErr jr >,. 3E 


■ 15, 15, 15. 15. 15. 15,47,95 


16934 DEFGRK34 


=136, 136,136, 136. 139. 124 



. 128,8 

10837 DEFGS*(35'=9,9,8,8,254, 1,0,6 

18038 DEFGR*<36>=8, 9,6,6,8, 128,64,32 

19839 DEFGR*(37> = 1,8,6,8,28,63, 127,255 

18848 DEFGR*<33>=224,32,32,32,33,35, 167, 

215 

19041 DEFGR*(35i=31,63, 127,255,255,255,2 

55,255 

10842 DEFGR«(40>=61,53,5Q, 52,36,36,8, 10 

19943 DEFGPJMl^l 28, 64,66.35,36,36,36,4 

6 

10044 DEFGR*'.42> = 60,60,24,24,144, 144,144 

,136 

19945 DEFGR*C43>=32,24,4,8, 16, 16,8,6 

10846 DEFGRJ<44>=0,0, 1,2,4,8,8,16 

10647 DEFGRJf45)=64, 128,0,9,8,9,3,7 

19943 DEFGRS'4£>=9,0,7, 15,93,191,63,60 

10849 DEFGR»(47>=25, 248,255, 248,248.224, 

8,6 

10858 DEFGR»(43>=8.128,32,232, 129,243.25 

2,124 

16851 DEFGR*C49>=16,8, 56,68, 138,64,64,64 

18652 DEFCR*<51>=32, 32,33, 33,38, 48, 88,96 

10053 DEFGRS(5£)=I38, 130,2,255,8,0,8,8 

10654 DEFGR*(53)=9, 9,9, 192,48,8,4,2 

1 9855 DEFGR»<54 1 =24, 36, 67, 64, 64, 32, 32, 32 

18856 DEFCR«(55>=64, 123, 123, 128,64,8,0,8 

18957 D£FGR*(56>=64, 64, 64,64, 64, 32, 63, 32 

19858 DEFCR*<57>=32-32, 16,8,3,4,4,2 

19659 DEFGR*<58i=l, 1,9,8,8,8,8,8 

18068 DEFGR*<59>=4,2.139, 129, 129, 128, 128 

,64 

18961 DEFCR*(60)=16,8,8,4,2, 129, 123. 128 

18962 DEFGR«(61>=6,9,6,8,8,9, 128,64 
16063 DEFGR«(62>=8,3, 8,4, 4,2,2, I 
19664 DEFGRS(63>=46,46, 16, 16,8,8,8,4 
10865 DEFGR*(64>=123, 128,64,64,64,64,32, 
32 



10863 DEFGR«C67>=8,6, 128,128, 128, 128,128 
, 128 

10869 DEFGRI<63>=255, 127,63,31, 15,7,3, 1 
16979 DEFGR*'69>=8,8,8, 1,5,8, 16,32 
1097,1 DEFGR*<7Bi=64, 128,9,9,6, 1, 1,3 
18872 D£FGR*<71)=t,3,3,7,7,7, 15, 15 
19973 DEFGRS<72>=9, 19,3,3,3,1,1,1 
18974 DEFGR*(73>=2,2,2,4,5, 16,12,16 
18875 DEFGR»(74)=I6,32,64, 128,0,8,9,9 
18076 DEFGR*<75)=66.63,71,64,64,60,2,2 
18877 DEFGR*'76>=8,8, 192,32, 16,16,16, 16 
19979 DEFGR*<88>=192.192. 192,255,255, 192 
,192.192:DEFGRJf8H=8, 12, 14,255,255, 14,1 
2,8:DEFGR*C82)=60,24,24,24,24, 126,68,24 
10088 DEFGRf<83>=16,32,127. 128, 1 28, 127, 3 
2. 16:DEFGR«<84)=3.4, 254, 1,1,254,4,8 

10881 DEFGRS(85)=16, 16, 16,255, 16, 16, 16, 1 
6 

10882 DEFGR*(36)=8,4,2,255,2,4,8,9 
10299 RETURN 

I19I9 n.U) = - -+GRI' 65)*GR*(66>*GR»'67) 

11812 A*(2> = - •■♦GPS'62>»GR«'.63>*GR*(64> 

I10I3 A#<3)=" ■*GR*<38>*GR*<39)+GR*(68>+ 

GP»'61; 

11814 A»<4> = * -*GRl'54H'GRf '•55>*GR*(56>* 

GRS<57> 

110J5A$'5) = - "+GR*<49>*' "*GP»':5l>*GR*< 

52<-GRi(53) 

11616 A*(6>-* -*GP*.43"-GRI(44>*CRf<45) + 

GRI< , 46>»GR«(.47>*GR*f43>*'' "*GR*(75>*GR»( 

76> 

11817 AJ<7) = " -*GPJ' 37;«-GR*':33)*GR«<39; + 

GP*''40>+GP*(4W*GR*'42"' -+GP*' 73* *GPI'' 

7-i 



36) 

11819 R*<9)«GR*(72>*GRtt2J t-GRt^E -0- t 

... ■;- t. ,-.i r*GR*< B5 - '«■- '*GR*<28) 
;;920 A*<18>-' "*GRf(68)*GR*<14J*GR*(l3) 
»CR*<16>*GR*(17)*' •■ "-GP*<29> 
11021 A*' 1 1 ■ = " "+CRf<69 i*GRf<7 >*GR*' ". ■ •■:. 
R*<9)*CR« 10 .*GP*< l l >»GR*' 12 ^GR*' 13 
::022 <**(12>«" "♦GR*(79)*CRf(l>*GR«c2i*G 
F i- - ■•r.siM »GR*< 3 ■ >GR*' i ■ 

■ -■ -rTPB0.9:EC:' r 29,2J-<38,22 " '.7.- 
:;0LOP3.4 
11100 F0PI=1T0I2 
11110 L0CMTE23, :0+l:PPlNT»5. 1 ■ 
11129 HEXTI 
: :£7* line 289, I 
11240 LIME' 297, 123 •-' 302,86* 
::256 8OX<228,36>-<30< - - 
11266 LINE(301,96 ■ : " ; ■■ 
12006 RETURN 

12805 '.*..».. ..,,...,.,,.,...... 

12619 COLOP3,4:eo;-:F' 2?,5--' 37.9'" ",4:C0 

L0P3,4!PETURN 

12628 GOiUBI2010i»-'> ; 

E30,8iRPJNT "PERDU - ' : wl TPbO, fi:PETUPN 

12830 GO9U012819.ATTRB9, 1 : C0L0R3. 4SL0CAT 

Z 39, S. PRINT "8PAV0' 'iflTTR00,9l RETURN 

I2860 GOSUB12018CC 31 ■> '-.■f.i.Oi ..If..:'.', ■■:-»• 1 

MT"TU h i" : LOC Ml T, :'.":' '■ IMT B OUB IE' il OCAT 



E29.S:PRIMT-LE SIGNE" 

12970 RETURN 

12888 GOSUB129!0:LOr:ATE2?.6:PPINT-FAUTE 

DE":L0CATE29,7:pRINT-FPAPPE°:PETURN 

12990 GOSU8120I0:COLOR3,4:LOCATE29.6:PRI 

NT'Je te*:L0CATE29, 7: PRINT"con5ei 1 le" : LO 

CATE29,3:pRINT*cJe le" : L0CATE29, 9: PRINTV 

efaire!":F0RI=lT03689.NEXT::RETURN 

28899 'MttlM*»*t4M»astaf*tlt«ltMINt 

20092 *•#• MENU LECONS-'EXEPCICES »M 

20897 * •iiti.iiKiiiiiiiiit.i.iiKiii, 

28805 C0L0R3,8:ATTR8I,9iL0CATE4,3:PR1NT* 

EHSEtlBLE Z":ATTRB0,0:eOX<28,28)-(196,36) 

,3 

20818 COLOR7,8:L0CATE6. 18:PRINT-- A - LE 

C0NS":L0CATE6, 14:pRiHT'- B - EXERCICES" 

26028 C0L0R7,4:L0CATE29,6.-PRIMT-Tapcr su 

r u :LOCATE30,8:PRINT n A ou B" 

28038 C0L0R3, 9: LOCATE 1,22: PR INT"CH0IX<A>- 

B):":L0CATE13,22:AI=IHKEY*:Z=RND 

20948 IF A*=-fl- THEM 28188 

20856 IF A*="B" THEN 18 

28968 G0T026638 

20108 '•iiimi.iiiiiiiiiii 

201.il '•»• tlEHU LECONS ■•• 

20182 niiiiiiKiiiiitiii.au 

28116 COL0R6,8:B0XF;e,8)-'27,23)- ":G0SU 

B120I8:COLOR3,8!BOXF(4, U-<25,3>* "iATTR 

Bl, 8: C0L0R3, 9= LOCATES, 2, 6: PR I NT -ENSEMBLE 

Z-:B0X<36, I2>-<283.28>, 3 
28128 ATTRB8, 6!COL0R7, 8: LOCATE 1,6: PRINT" 
l-If.troductiod.":L0CATEI,8:PRINT-2-Addi t 
ion(Effeetuer a»b). ": LOCATE 1 , 18: PRIMT"3- 
Addition(Ex««ples)." 

26138 LOCATE 1,1 2: PR INT "4-Sous tract ion. ■: 
LOCATEI, 14iPRINT-5-0rdrc dans 2.-JL0CATE 
1. 16 : PRINT "6-Ex«rt:ic«s.' 

26146 C0LOR1, 6: LOCATE 1,22: PR tMT'CHOIX:-! 
C0L0R7,4:L0CATE29, 5,0: PRI NT"Taper E Ur -:L 
OCATE29,6,0:PRIMT"1,2,3.4,-:LOCATE29,7,9 
:PRINT"5 ou 6. ": COL0R3,4:LOCATE38, 9: PPIN 
T "MERC I !-iCOL0Rl,8: L0CATE7, 22: PRINT'?* 
28158 COLOR t,0=LOCATE7, 22: A»=INPUT*<I>:R 
A=VAL<A*>:IF RAOl AND RA<>2 AMD RAO 3 A 
ND RA<>4 AND PAOS AND RA06 THEN 26158: 
ELSE ON RA GOTO 26288,28386,28486,26588, 
28608, 18 

29288 ■•miiuiiiiHHini 
20202 '••# DLECOH Mt 

20284 ^mttinm.t.in. 

20285 CLS:SCREEN7,0,3 

28228 COLOR3.0! ATTRB 1,0: LOCATES. UPRINT" 

lNTR0DUCTI0N":80Xf36.5)-<239,I9),3 

20225 ATTP80,0:COLOP7.&:LOCAT£O.3:PR1NT , ' 

Un entier relatif est const, tuc: ": L INE-: 1 

,36>-<256,36),l 

28227 COLOR1,9.-LOCATE0.5:PPIMT- d'un en 

ti«r naturel (ualeur absolue>. ": LOCATES, 

6:PPINT"- d'un signe (♦ ou ->." 

26229 COLOR7,0:LOCATE0,3:PRINT"EXEMPLES: 

":LIME(I,76)-<64.76>, 1 

20236 COLOR3,0:LOCATEI3,8:PRIMT"I> ":C0L0 

R7, 6: LOCATE 17, 8:PRINT'< + 12>":L0CATEI 9,10 

iPPINT-Signe^-JLOCATElO, 1 1 :PPINT"Valeur 

absolue: 12" 
26232 COLOR3.0: LOCATE 13, I 3: PRI WT"2 ' " : COL 
0R7, 8! LOCATE 1 7, I 3: PPINT"(-23)":L0CAT£1 «, 
15:F'RINT"Signe:-":L0CATEie, 16: PR INT "Vale 
ur ab50iue:23" 

20234 LOCATE0. 18:PPIMT"L«s entiers relat 
lis de signe:":L0CATE3. 19:PPINT"' sont d 
i*e posi tifs":LOCATE3,20:PPINT"- sont di 
ts negati Is" 
29236 G0T039896 

20368 '•tt«*»«**«*««ititta«« 
28302 '■#• 2>LEC0N *•• 
26384 *i.i«. ■■]<<■• ■■•■■• 
20306 CLS:SCRE£M7,8,3 

20319 COLOP3,0:LOCATE7, 1,0:PPINT"LE riEME 
:IGNE":COLOP7.0:LOCATE23.1:PP1MT-'LE S1G 
NE DE LA-:LOCATE24.2:PPINT"S0rtME EST :' 
20326 COLOR 1,0: LOCATE 13, 5: PR INT "PLUS* I LO 
ChTE26-5:PPINT"MOIN7":COLOR7,0,LOCAT£18. 
5:PRINT"si":L0CATE32.5:PPlNT"si" 
28330 LOCATE14,6:PRINT-a et b" :L0CATE27. 
6:PPINT"a et b" 

20340 L0CflTE14,7»PRIHT"»ont *-fL0WTE87, 
7tpRINT"ion1 -"iLOCATE]0,9IPR!HT"Lj ualc 
ur absolue de la'sLOCATElO. 16: PPINT'so** 
■.-* la ioM*e des".L0CATE12. I HPPIHT"i,a 
leurs absolues. " 
26358 COLORl.OiLOCnTEl. 12:PPIMT"a it b"i 

LCCRTE0,12» PRINT" 

— "IL0CRTE2, 13:PPINT'-ont:":C0L0P3.8:.0C 
--E7,15:PPINT"DES SIGNES" 

20369 L0CATE7, U^PINI-DIFFERENTS-iCOLOR 
-.8.LOCaTE23.M:PPINT-"LE SIGNE DE L"-:L0 
*.hTE24, !5:PPINT"S0MME EST:" 

29379 L0CATE24, l6:PRIMT"Le signe dt"!L0C 
ATE24,17lPRIHT"(«l01 qui a":L0CATE24. : 7: 
opiNT-La Plus 9rtndfaOCAT£24, IflipRINT" 

,)■ mi ibsolue" 
29390 LOCATEI6.20!PPlNT"La -/sleur absolu 
e de la M :L0C.'»rE18.21 :PRINT"sobh« est la 
dir#t^*ne«-t|.OCRTE10,22iPRII#T"w«l«ur« ab 



solues. " 

2-J399 B0XC4,92>-C68,U2>,I 

20391 C0L0Rl,8lLlKE<32,92>-(32, 11>:L1NE- 

- 40. il :LINE(32, 11 2) -(32, 131 >:LINE-(48, 1 

31 > 

28392 L0CATE5, 1 :PRINTGRt<86> : L0CATE5. 16: 

ppiNTCRltSfi) 

26393 GOTO38806 

20408 'lutl ■•tlllil 

20402 '■•• 3>LEC0N ■•• 
20463 ' •••••••■•■■■■■••■•4 

20465 CLS: SCREEN?, 0,3 

20410 COLOR3,0: ATTRB 1,0: LOCATES, 1 1 PRINT 1 

ADD:TION-:ATTRB0.6:8OX<66,5>-<195. 19>.3 

28415 C0L0R1,8:L0CATE2,3:PRINT*1>":L0CAT 

E2.7:PRINT"2>-:L0CATE2. 1 1 : PR I NT ■ 3 > " : LOCA 

TE2, 15:PRIMT"4)" 

28428 COLOR3,0:LOCATE6.3:PRINT-(*3>»C*3> 

=<*8)-:L0CATE6,7:PRINT-<-3)*(-5)-(-2)-:L 

0CATE6. 1 i:PRINT"(-3)*f»5'*-<»2)":L0CATE6, 

15:PRINT-<-3)*(-5J=(-8J" 

20430 COLOR7,8:L0CATE21.3:PRlNT"Meaies si 

3.',es:*"tL0CATE6,4:PRINT"-si9ne co»»un:»* 

:_0CATE6,5:PRINT"-So»i.e des ualeurs abso 

lues":L0CATE21,7:PRINT"Si?in«s di flerents 

20435 L0CATE6,8:PRINT"-S»9ne de (»5> car 
5>3 - :L0CATE&,9:PRlNT"-Di f lerence des «a 
l«urs 3bsolues-:L0CAT£21,7:PRINT*Si<ines 
differtnts" 

20437 L0CATE6, 12: PRINT'-Signe de <*5> ca 
r 5>3".-L0CATE6,13,'PRINT"-Di*lerence des 
valeurs absolues" 

20439 L0CATE21, I5:PRINT"Hei»es signer:-*: 
L0CATE6, 16:PRIMT"-Slgne co-nun" !L0CATE6, 
l":PRINT"-So»»e des valeurs absolues" 

20440 COL0R2,6:LOCATE8,19iPRINT*Deux not* 
b'ts dont la soaae est ;»ro":LOCATE0,20: 
PRINT'sont dits opposes, E«e»ple:<-8> «t 
<+8>* 

29499 GOTO30608 

28497 ' mouinm, 

20498 '••• 4>LEC0N ••• 

28499 I Illllillllill 

28500 CLS:SCREEN3,8,3 

26516 COLOR3.0: ATTRB l.O: LOCATES. l: PRINT* 
SOUSTRACTION":ATTPB0.0:BOX<60,5>-<258,19 
>.3 

26526 COLOR 1,6: LOCATE 1,3 = PR 1 NT "PEGLE: - : [_ 
INE(8,36>-<48,36),7:C0L0R3,0:L0CATE8.4:P 
PINT-Retrancher un nonbre re 1 a 1 1 l":L0CAT 
E9,5:PPINT"c'est ajouter son*: C0L0P7. 0:L 
0CATE26,5:PR]NT"oppose. " : B0:-:( 68, 28 W 292 
. 50 ■." 

20538 C0L0Rl,6:L0CATEl,7:PRINT*Exe»plesi 
-:C0LOR7,O:L0CATE12,7:PPINT-.»18>-(-38>» 
<'I8)»<*38>":L0CATE23.8:PPINT"=(*56>":LI 
ME<8,68>-<72,68),7 

20546 LOCATE 12, 19: PRINT". +51 >-C + I2)"(*5J 
'••-12)":L0CATE23,11:FPINT- = .>39v:LIME< 

9, : :&•-■ 72, 116). 7 

20550 COLOR 1, 6: LOCATEI. 13iPRIKT'E«iu«tlor 
! 'iC0L0R7.8iL0CflTE3. I5:PRIMT"' +1 I ■♦■■ = . *7 
> :" ■'*&R((83)*CR»<34) + " -:--=-- -il 
•t LOCATEI 6, t6:PRINTGP*'.33..*GRt<84) + - "| " 
:*i .7 ■<■■ -I 1 '.*: LOCATE 16. I7iPRINTGR*C83 KG 

PJ(84>+" "J"r=<-4)" 

20598 G0T036698 

2C597 ' «it»«tmi»M«.«#»t. 

28598 '••• S^LECON til 

28599 'MMMIHIIIIIIMIK 

26690 CLS:SCREEN3,9,3 

28616 COLOR3,0: ATTRB 1 .0: LOCATES. UPPINT" 
OPDRE dans Z" : ATTPB6.O:B0X<36, 5>-(239. 19 
'.3 

28628 COLOR 1, 8 : LOCATE 1,3: PR I NT "Reper age 
sur un a *e:"iC0L0R7.e:rORI=2TQ24:LOCATEI 
.6iPRINTGP«K35>:NEXTI:L0CATE25»6:PRINTGR 
1 '86): COLOR 1.6: LOCATE 14, 7: PR INT "6" 
20638 C0L0R2,6iL0CATEl,5:PPINT- B C 
A D F E 

20640 CQL0R2,O:L0CATEl,3:PRINT"Cha«!ue po 
int est associe a un nowbre. " : COLOP7,0:L 
0CATE6. 1 J:PPIMT"m IC-4) 91 10 I 



20658 LOChTEO, 12»PRINT"I 



.. 1 . 



20669 COLOR 1 r 9t LOCATEI, I4IPF IHT'C«n»»arai 
sen de deux relati f s: " t COLOR7,0: LOCATE0. 
15:PPINT-.-Un no«tbr« negatif est plus pet 

i' ■':L0CATE3, 16:PPlNT-<,.,-.,n noabrc POSlt 
H.E't'.-9" (+2)" 

20670 LOCATEO. 17:PPIMT"-Le plus petit de 

.:(_■.■ nr>»t.r<.r post tl f*"l L0CATE3, 10IPRINT 

•«*( celui (iui a U Plus peti te":L0CATE3 
. 19:PPlMT"i,al«ur absolue. E t<*3) •■ 
20630 LOCATE0.20tPPINi"-L • plu - ' i • di 
deux no>bret nt**< Hf'tL( 
-es' celui iui a la plus grand* *:L0CAT£3 
.22:PRIMI"ual«ur abs&l.K.E. i -7) — ■' 

30908 COLOR3,0!LOCATEfi.23!PPINT'- ' 

- entree pour cont inucr . " rE0,0»0lAl 

■ INKEYfilF ..I >CHRI 13) THEN 39900 
30010 CL*!G0SU81 10I01G0TO20100 • 
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Formation a I'assembleur 



COURS D'ASSEMBLEUR 



Depuis plusieurs semaines. 
vous profilez dun cours d'as- 
sembleur decompose en deux 
parties principals (lune Iheo- 
rique. I'autro pratique). 

Cette semaine. le cours prati- 
que concerne une nouvelle 
lois le 6502 de t'Oric t et de 
I'Atmos. Le prochain numero 
consacrera une pleine atten- 
tion aux angoisses majeures 
du 6502 do I Apple 

Jusqu'a present, les cours pra- 
tiques sulvant ont ete publies: 



N"55- 


ZX8I 


N-56- 


ZX8! 


N-57- 


ORIC 1. ATMOS 


N'58- 


APPLE 


N - 59- 


T07. T07 70 


N - 60- 


COMMODORE 61 


N'61 -, 


ZX81 


N*62- 


ORIC 1. ATMOS 


N'63- 


APPLE 


N - 6-l- 


TO 7. T07 70 


N - 65- 


COMMODORE 64 


N - 66- 


ZX81 



Lorsque nous voudrons noter 
qu'une operation NAND a lieu 
enlre deux variables, nous uti- 
hserons _la convenlion sui- 
vanle: (a . b). Vous pouvez 
vous rendre compte (en 
comparant leur (able de verite) 
que la fonction 'NAND" est 
Hnverse de la fonction "AND*. 
Le circuit electronique corres- 
pondant a la tonction *NAND* 
se nomine lui aussi NAND. 
Nous allons voir maintenant la 
table de verite de I'operation 
■NOR'{ou"NONOU"): 



b\ 1 

1 

1 



Table de la fonction NOR. 

Lorsque nous aurons besoin 
de representer cette operation 
entre deux variables, nous 
userons de la notation: (a*-b) 
Tout comme entre "AND" et 
"NAND". "NOR" est la fonction 
inverse de "OR". Comme d'ha- 
bitude. le circuit electronique 
permettant de realiser cette 
fonction s'appelle NOR. 
Contemplons maintenant la 
table de verite de la tonction 
-XOR- (ou "OU EXCLUSIF - ): 



b\ 1 

1 

1 1 



Table de verite de XOR. 
Nous symboliserons cette 
fonction (lorsque nous vou- 
drons noter une operation 
entre deux variables) de la 
maniere suivante: (a . 0). 
Comme d'habitude le circuit 
electronique qui donne cette 
table de verite se nomme XOR 
aussi. Nous allons voir mainte- 
nant la derniere table, celle de 
la fonction "NXOR" (ou "NON 
OU EXCLUSIF"): 



b\ * 

t o 

1 1 



Table de verite de ia fonc- 
tion NXOR. 

La derniere notation ulile que 
vous aurez a savoir r econna i- 
tre sera celle-ci. (a . D). 
Comme pour chacune des 
fonctions precedentes. le cir- 
cuit electronique associe a 
cette derniere fonction se 
nomme NXOR. 

Maintenant que nous avons 
brievement traite des dilteren- 
les operations logiques a la 
disposition du concepteur d'or- 
dinateur, nous allons etudier 
les particularites do I'uno d'en- 
tre elles. En effet. la fonction 
NAND est la seuie a partir de 
laquolle on peut obtenir (en la 
composant avec ©He-memo ou 
la fonction inverse) toutes les 
autres fonctions. Mais avant 




JD> 




de continuer, nous allons nous 
accorder sur une convention 
de representation des circuits 
logiques. 

Representation graphique des 
circuits logiques: 



cuit NAND? Si nous nous re- 
portons a la table de verite vue 
la semaine derniere, nous 
voyons que le seul etat carac- 
teristique pour le circuit est 
zero. En effet lorsque nous ob- 
tenons a la sortie, la porte 
est ouverte ET I'information 
contenue dans "a" est vraie. 
Le circuit NAND permet done 
de savoir si a = b = 1. 

Rappelons-nous maintenant le 
deuxieme theoreme de Mor- 
gan. Nous y avons vu que 
NOR ("non ou") est egal a "non 
a" ET "non b". Nous pouvons 
facilement en deduire que OR 
est equivalent a *a" NON ET 
*B". Nous voyons deja apparat- 
tre. pour simuler un OR, un 
NAND. II nous reste a determi- 
ner si grace au circuit NAND. 
nous pouvons engendrer une 
fonction "inverse". Regardez le 
schema ci-dessous: 



NXOR 

Vous remarquerez que le rond 
symbolise linversion du resul- 
tat. Pour vous rendre ces re- 
presentations plus concretes, 
dites-vous que chaque fois 
que vous faites appel a une 
mnemonique du lype "ORA" ou 
"AND" dans un programme en 
assembleur, vous demandez a 
I'ordinateur de traitor les deux 
variables en les faisant passer 
dans un circuit electronique tel 
que ceux representes au- 
dessus. 

Pour pouvoir expliquer 
comment la fonclion NAND 
peut permettre la simulation 
de tous les autres circuits. 11 
faut d'abord apprehender le 
fonctionnement do ce circuit 
NAND. Regardez de nouveau 
le schema du NAND. Nous 
allons Imaginer que le circuit 
est une porle. Le fil "b" en sera 
alors la poignee. La poignoo 
ne sera ouverte (et la porto du 
memo coup) que si I'informa- 
tion vehiculoe par le fil "b" est 
egale a un (elat vral pour le fil 
considere). Si la porte est ou- 
verte. ['information porloe par 
le fil "a" franchira cello-ci ol 
s'inversera a la sortie. Dans 
I'hypothese contraire (poignoo 
et porte fermeo: b 0) quollo 
que soil la valeur de "a", rlon 
ne passera (otat zero pour 
I'operation AND) el le resultat 
s'inversanl on obtiondra un 
etat du circuit egal a 1. Quelle 
cerliludo permet d'avoir le cir- 



NANDoulNVERSEUR? 

Que se passe-t-il dans ce cir- 
cuit? Nous avons la meme in- 
formation qui aboutit aux deux 
entrees du circuit NAND. Nous 
pouvons done connaitre le re- 
sullat de cette operation en 
consultant la diagonale de la 
table de verite de NAND. Nous 
conslatons qu'effectivement 
lorsque (a ■ 0). le resultat est 
1 et que lorsque (a = 1) nous 
oblenons 0. Nous avons done 
bien. grace a un circuit logique 
NAND fabrique un inverseur. 
Nous savons done que pour 
effectuer I'operation OR. il 
nous suffit d'utiliser trois cir- 
cuils NAND. Vous pouvez ro- 
garder ci-dossous le schema 
qui correspond a ce montage. 




OR simule par NANDs. 



A partir de ce schema, il parait 
simple de construiro un circuit 
conslitue de NANDs et rempla- 
cant un NOR. II suflit do recu- 
perer le fil de sortlo. do lo d6* 
doublor et do (aire aboullr ces 
deux nouveaux fils dans un 
NAND pour invorser lo r6sultat 
precedent. 

EX 18 Construisoz un circuit 
base sur des NANDs ol offoc- 
luant I'operation ANO. 



INTRO A L'ASSEMBLEUR PRATIQUE 

Langage machine. . . sur oric 




BONJOUR! 



Aujourd'hui, il n'y aura mal- 
heureusement pas de cours 
d'assembleur pour Oric, car 
j'ai perdu mon stylo. C'est 
vrai? Non, e'etait pour rife. 
Maintenant que vous avez 
bien rigole. au boulot. 

GOTO, JMP, 
MEME COMBAT! 

Je ne vous fais pas de transi- 
tion, vous prenez le cours du 
n° 62, vous le decoupez, vous 
le collez au-dessus de celui-la, 
et on continue en oubliant que 
5 semaines les ont separes. 
Allons-y gaiement. 
Une instruction est fondamon- 
tale, autant en basic qu'en lan- 
gage machine, c'est celle qui 
permet le saut destruction. 
Tiens, la demi-page da cote 
qui deteint. Bon, d'accord. je 
vais essayer d'expliquer de 
facon plus comprehensible. 
mais c'est difficile, voyez- 
vous, car j'ai la science infuse. 
En basic, vous avez ('habitude 
d'utiliser des ordres comme 
GOTO 100. Figurez-vous que 
la memo chose existe en LM 
(je suls chebran). et ca porte 
memo un nom: JMP. 
Seulement voila, il n'y a pas 
de numoros de llgne en lan- 
gage machine. Certes, sur les 
assembleurs symboliques. 

cette lacilite est accordoo, 
mais vous n'etes pas la pour 
faire joli, alors oxaminons les 
cas les plus arrides. Chaque 
instruction a une place dans la 
momoire. Reprenons I'exem- 
ple de la semaine derni6ro. 
Void la suite destructions: 

LDA # $41 
STA $ BB80 
RTS 

Comment va-t-elle etro placee 
dans la memoire? Admettons 
que notre programme debute a 
I'adresse H 400. Nous savons 
qu'une instruction occupo un 
octet. Done, en H 400. nous 
allons mettro le code de LDA, 
soft tt A9. Puis, nous allons 
placer a la suite ce qui suit 
LDA, a savoir tt 41. Cot octet 
sera done, en # 4011 Bravo! 
Continuons done allegrement, 
avec lo code de STA qui est II 
8D, que nous placerons bion 
evidemmonl en tt 402, ca de- 
vient vraiment routlnior, les 
deux octets suivants seront en 
It 403 et tt 404, et nous arri- 
vons au petit RTS, dont le 
code est, vous vous on dou- 
tez, tt 60, qui viont se placer 
bien sagement on u 405. Ca 
va? J'espere. parco quo ca so 
complique. 

Au llou de s'arretor avoc Tins- 
Iructlon RTS, nous allons d6cl- 
dor do recommencor au debut. 
Un programme basic equiva- 
lent se prosontorait do la facon 
suivante: 

10 A~ # 41 
20 POKE* BB80.A 
30 GOTO 10 

Vous romarquoz la dornioro 
llgne? Elle slgnilie que Ton 
vout executor ia suilo du pro- 
gramme a partir do !n promi6ro 
instruction do la llgne qui porto 
le numdro 10. Cost booucoup 
plus simplo on langage ma- 



chine: vous voulez aller au 
debut? C'est-a-dire a I'mslruc- 
tion qui se trouve en # 400? 
Alors, JMP # 400! Vous avez 
deja vu plus simple? 
Mais il y a mieux. Oui. je sals, 
je dis toujours ca. Mais cette 
fois-ci. c'ejst vraiment gonial. II 
existe une instruction qui est 
strictement equivalente au 
GOSUB du basic, et qui porte 
le doux nom de JSR. J'en vois 
dont I'oeil s'allume, car ils ont 
deja lait la relation avec RTS, 
qui est I'equivalent de RE- 
TURN... 

Eh oui, JSR vous permet de 
faire appel a un sous-pro- 
gramme, autant de fois que 
vous le desirez. Regardez le 
petit programme suivant: 

0400 LDA # $41 
0402 JMP $ 040B 
0405 LDA # $42 
0407 STA $ BB80 
040A RTS 
040B STA $ 8B81 
040E JSR $ 0405 
0411 RTS 

Nous allons suivro son derou- 
lement pas a pas. En passant, 
vous remarquerez que vous 
connaissez toutes les instruc- 
tions... Vous pouvez d'oros et 
deja commencor & faire des 
petlts sous-programmes. 
La premiere instruction, a 
I'adresse It 400, charge I'ac- 
cumulateur de la valeur # 41, 
solt 65 en decimal. Puis on 
passe a la suivante. Nous 
trouvons une instruction de 
saut: JMP $ 040B. Le moniteur 
(ce qui se charge d'executer 
les instructions en langage 
machino) va done consldorer 
que la prochalne instruction a 
accomplir se trouve a 



on charge I'accumulateur de la 
valeur # 42 soit 66 en deci- 
mal, puis on place le contenu 
en # BB80. soit 48000. Puis, 
et c'est la que la beaute du 
langage machine se fait jour. 
on rencontre Y instruction RTS. 
Alors le moniteur va chercher 
dans sa pile si une adresse a 
ete mise de cote. Oans ce cas, 
il en trouve une, bien sur: 
I'adresse # 411, qu'il avail 
empire lors du JSR. II va 
done consideror que la pro- 
chaine instruction est a cette 
adresse, et execute ('instruc- 
tion associee. II s'agit ici dun 
RTS. encore une fois. On re- 
commence: y a-t-il une 
adresse empilee? Non, alors 
on rend la main a 1'ulilisateur. 
et vous revenez sous controle 
basic. 

En fait, j'exagere: il y a bien 
une adresse empilee, c'est 
celle de llnstruction basic qui 
vous a permit d'acceder a ce 
sous-programme en machine. 
De fait, vous n'avez pas a 
vous en preoccuper. cela fait 
partie de la gestion interne du 
basic. 

Pour terminer, et uniquomont 
parce que c'est vous, volcl un 
petit programme que vous ne 
comprendroz peut-etro pas car 
j'y utilise des Instructions que 
vous ne connaissez pas en- 
core. De plus, je me sors dos 
interruptions, et nous ne les 
6tudierons que beaucoup plus 
tard. Contontez-vous de le 
taper, et admirez. Vous avez 
deux listings; le premier est en 
basic, et vous n'avez pas be- 
soin d'assembleur pour le 
taper. Si vous disposez de 
I'assembleur Monams, vous 
pouvez taper lo second. 

lor listing & 

10 FOR N-0 TO «2:RRAD A» = A- vAtr£(-*A«>'POItS££400»N.A:NKXT 

20 DATA 4B,AD.7«,02.C?.18.F0.1F.C9.l9,F0.ia,CV,lC.F0,17.C9,ID,F0,l3 

30 DATAC?,?8.F0,OF,CT,99.F0,OB,C? 1 ?C.FO,0T,C9,9D,FO^3.8D.eO,BB^e,*C.I2 

At 
40 RBM POUR ORIC-1, RKHPLACKH LBS D8UX D8RNIBR CHIFFRKS PAH 03.HC 
30 DOKB (£Z43,£i400i R8H POUR ATMOS 
30 DOKB (£229,££400r REM POUR ORIC-I 



I'adresse indiqu6e, soit $ 
040B. La, nous trouvons un 
STA $ BB81 do belle facture. 
qui vout dire "placer le contonu 
de I'accumulateur en $ BB81". 
solt I'equivalent do POKE tl 
I'.Bhi,'.' 41 en basic. II est a 
noter quo tout comme une va- 
riable, laccumulatour gardora 
son contenu Inchang6 apres 
une telle operation. Nous pas- 
sons onsuite a I'lnstruction sui- 
vante: JSR $ 0405. Vous vous 
rappolez? Si non, vous dtos 
impardonnable, c'est a poino 
trente llgnos plus haul. Cela 
signifio "allor executor le sous- 
programme se trouvant a 
l*ndresso indlqudo", soit tt 
405. Alors la, jo vals expliquor 
un peu plus precisoment ce 
qui se passe a I'lnterleur de la 
machino, parce que Je vous 
garantis que ga vaut lo jus. 
fi y a a I'intftriour de voire ma : 
chine un petit sous-pro- 
gramme, qui n'ost pas on as- 
sembleur mais un niveau do 
langage au-dossous, qui me- 
morise a chaque instruction 
executeo I'ondroit ou olio Otait 
dans la momoiro. Pourquoi? 
Tout simplomont pour 6tro on 
mosuro ao savoir ou so trouve 
la sulvanto. Lorsque uno ins- 
truction du type JSR a eto luo 
(mais pas encore oxocui6o), lo 
6502 "ompilo I'adrosso do ro- 
tour". Jo m'oxpliquu. Uno fois 
I'lnstruction JSR $ 0405 luo. lo 
"pointeur" so trouve on n 41 1 
Cotto ftdrVSU out sdhjnousoi 
monl miso do coto. N oubliez 
pas cola, nous allons y rovo- 
nlr. 

Done, on va oxocutor lo sous- 
programme contonu on tt 405. 
Rlen do plus simplo, ot vous 
commoncoz a avoir I'habitudn: 



Vous n'avez memo pas besoin 
de faire un CALL; faites sim- 
plomont RUN. 



2eme listing i« 
io-pha 

20 "LDA427S 
30-CKP£flt8 
40 'BNK OK 
50 -CKP(£»I9 
60 "BNK OK 
70 -CKP££IIC 
60 -BNE OK 
90-CKP(£»ID 
100 -BNK OK 
110 •CMP££*90 
120-BNH OK 
130 •CMt'££l99 
!40 -ONK OK 
150 'CMP£C»9C 
liO'BNK OK 
170-CMP££t9D 
180 -DNH OK 
190-STA4BB80 
200 "OK PL A 
210-JHP4SK22 



SI vous avez un Orlc-1, rom- 

placez la derniere llgno par 

210 "JMP $ EC03. Assombloz- 

lo, puis tapoz on mode direct: 

SI vous avoz un Aimos, DOKE 

H 245, iC 400 

Si vous avoz un Oric-t. DOKE 

H 229, It 400 

Voila. A la prochalne. 

Michol Desangles 




D;insk;s doux list inrjs. 
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'la page pedagogique 



la page pedago — 



ASTRO BLASTER 



TI99 BASIC ETENDU 



D'apres I'auteur, ce jeu depasse les autres program- 
mes deja parus par sa qualite graphique et aussi par 
sa rapidite. Tapez ce programme el vous pourrez rai- 
der a se balancer des coups de pompe dans les che- 
vilies 

Yan BERTHOU 




i ; H 



10 REM • R3TRO-BLA 

20 REM • FEAL15ATEUR • 

SO HEM • V. BERTHOU • 

44 REM • TI-99/4A • 

50 REM • BASIC ETENDU • 

60 REM • AVCC POIGNEE • 

70 REM • DE JEU • 

BO REM 

90 CALL CLEAR :: CALL 5CREEN(2):: COLL 
MAGN I F V i 3 > 

200 CALL CHAR(36."7F7F7F60606060607F7F7F 
606O606O6OFFFFFF 1 F t F IF 1 F 1 FFFFFFF 1 F 1 F 1 F 1 F 
IF" I 



?20 CALL CHAR(44. "7F7F7F7C7C7C7F7F7F7C7C 
7C7C7F7F7FFFFFFFOOOOOOCOCOCOO0OO0OOOFFFF 
FF") 

230 CALL CHAR(48."7C7C7C7C7C7C7C7C7C7C7C 
7C7C 7F 7F 7F0000OOO0O00OO000O00O0O0OO0FFF F 
FF") 

240 CALL CHARC52. "7F7F7F606O606O6060606O 
60607F7F7FFFFFFF1F1F1F1F1F1FIF1F1F1FFFFF 
FF") 

2SO CALL CHAR(56."7F7F7F6060606O607F7F7F 
6060606060FCFCFC7C7C7C7C7CFCFCFCF07B7B3C 






FF") 

270 CALL CHARI68. "OO0CO03O381COE07030 100 
OOOOOOOOOOO0OOOOO0OOO000OOSOC0EO7030O000 

oo-) 

280 CALL CHAR(64."7F7F7F636303O3O303O3O3 

03O3O3O3O3FFFFFFE3E3E0E0E0E0E0EOE0E0EOEO 

E0-) 

290 FOR 1=1 TO 14 

300 READ A.B.C.O.E 

310 CALL SPRIT£(#A.B,C,D,£> 

320 NEXT I 

330 DATA 1,36, 5, 10. 2, 2. 60.12,23, 21, 3, 64. 

13.36,-40,4.56,7.49,56.3,52, 14,62,77,6,68 

, 10,75,96 

340 DATA 7. 40, B, B8, 115,8,48, 12,-101, 134,9 

,36,4,114,153.10,60,5,127,172,11,64,11,1 

40,191 

350 DATA 12.44.14,153,211,11,56,3,166,23 

. 14,32, 1, 10,200 
360 RESTORE 410 

I FDR Y-O TO 52 
380 READ P,0 
390 CALL SOUND(P,0. 10) 
400 NEXT Y 

4iO DATA 250,500,400.250.300.280,330,330 
,300.400.200.500 

420 DATA 200,500.200.500.300.500,250.500 
. 400, 230, 3O0, 2BO 

430 DATA 350.330,350,330.350,280,400,250 
440 DATA 230.500,400,250,350,330,400,380 

300.440,230,500 
450 DATA 230.500,230.500,300.600,230,500 
,300,440,230,500 

160 DATA 350,330,350,330,350,330.230,500 
. 200, 600, 200, 600, 200, 60O 

470 DATA 250,500,200,600,200,600,250,300 
,350,500,300,440 

4B0 DATA 350.330,250,500,200,600,200,600 
.200.600,250,500,200,600,200.600 
490 DATA 250.500.330.300,300,440.350,330 
. : ,20000 

5O0 CALL DELSPRITE(ALL) 
510 CALL CLEAR 
320 CALL CMARSET 
530 REM 

540 REM ••EXPLICATIONS" 
550 REM 
560 FOR 1=5 TO. 14 :: CALL COLOR ( 1 . 15, I i : 



CALL COLOR ( 



14, 1) 



-ASTRO BLA 



"31 VOUS DEPASSE Z 1 
"VOUS POUVEZ VOUS I 

"TABLEAU DES LAUREA 



NEXT I 
570 FOR 1=1 TO 4 

NEXT I 
580 DISPLAY 6T(2.7jSIZE(17) 
BTER**" 

390 DISPLAY AT (5. B) : "VA ISSEAU DETRUIT : 
IOO F-T5" 

.■•■■ DISPLAY AT(7.B>:"RAVITAILLEMENT 
EFFECTUE : 500 PTS" 
610 DISPLAY AT(1I,4)SIZE(23>:"TABLEAU PA 
SSE ! 400 PTS" 

620 DISPLAY AT '13, 1 > : "VOUS GAGNEZ 1 VIE 
A 4000 ET 100OO PIS. 

I DISPLAY AT (16, II 
200 PTS" 

i DISPLAY AT (17. 11 
NSCRIRE AU " 
630 DISPLAY AT(IS.l) 
T5." 
660 DISPLAY AT <20. 6) SEEP: 'BONNES CHANCES 

670 CALL KEY CI, K, 3) 

690 04=2" 

690 IF K-Ifl THEN 720 

700 GOSUB 3700 

'10 GOTO 670 

'20 CALL CLEAR 

'.O CALL SCREEN(2) 

740 > I =6000 :: K2-4100 :: K3-3200 :: K4" 
2500 :: KS-1200 
750 IMAGE PT8l###M 
760 IMAGE Rl »H 
770 IMAGE Tt»» 
/Go CALL SCREEN(2) 
790 CALL CHAR (4m, "000024 181B24'n ioo ' , 4 I . " 

070F0F1F1CIA0U06" .A?. "OOOOOOOOOOOMK 

43, '■F0FaF8FC9C2CDB30"> 

BOO CALL CHAF<(3;, " 1 01 01 02BAAD69210",3S, " 
3555555535333353". 36, "COCO 30 30 OC Of! n SO 
S7,"03O3OC0C !030C0C0 , '.3B, "OOOOOOOOIf I 10A 

OA" I 

010 CALL CHARI39, "O0O00O007C442B2B" ) 

02O CALL CHARI 125. "2O505088AFBFAFrjEi" . l :.■/, 

. II 03F«OFFC0FFCO",i; 7, "FC02FE01FF01FF0 

B30 CALL CHAR(12S,"020S0S0SFAF6FAE8",129 

, "3130200000000000". I 50. "FFE07F 1 01F0B030 
3", 131 ,"FP03I F04PC08D0F0" , 132, "C3B302000 



B40 CALL CHAR(133,"000000808080BOBO") 
BSO CALL CHARU20, "609 1 OA05043F40AA403FO 
E0408106Q6006B950A020FC02A902FC7020 10080 



00") 

880 CALL CHAR 4100, "20441 A06451 204A96312B 
D50I842t420B448A124D06S10aA52C06CB16AB4A 
510") 

B90 CALL CHAR ( 104, "0041 80643 1205282S 1009 
50OB020000O000A0B-49064 1 0A850806C802AB000 
OOO" ) 

900 CALL CHARtlOa, -000000020502050C01 120 
9040 1 0000000000BO205O40 1 0A0508O60000O000 
000") 

910 CALL CHAR (112, " 3860E193BDOF1 7383F 1D0 
D8C93E 1 6038 1 C0687C9B 1 F0E8 1 CFCBBB07 1 C9B70 
61C-) 

920 CALL CHAR(il6. "00204043B7CDAE9FAECD8 
74340200000000402C2E1B375F975B3E1C202040 
OOO") 

930 CALL CHAR (88, "0001010000205188502000- 
2O5O200020B040408O00B44 A9 1 0A84 000 40 A0400 
04") 

940 CALL CHARU34. "070FOB! 12O2G40404O20O 
000O0OO0OO0F0FBEB44O20201O I 0102000000000 
OOO" ) 

950 CALL CHAR(140. "070FOB1 I 1010I0080C000 
000000OO00OF0F8E8440404040B 1 800000000000 
OOO") 

960 CALL HCHAR(24.B.35,241 
970 CALL HCHAR(23,2,33,3> 
9B0 CALL MAGNIFY13) 

990 SC-0 :: VIES-0 :: F-0 :: Z-0-5 :: R= 
:: T=! :: Vl=112 

000 EN-0 

010 FOR 1=1 TO 18 

020 CALL HCHARI (RND-2D + I, (RND*31 ) +1 , 40 

030 CALL HCHAR((RND»21>*1, <RND«31)*1,46 

040 NEXT I 

050 CALL C0L0R12.il, I, 3. 14. 1,4, 14, 1,5,1 

I, 1,6,5, 1,7,6, 1,1,14, 1, 12,6, 1,13,6, 1) 

060 DISPLAY AT(24,4)SIZE(2):"F:" 

070 DISPLAY ATU.25) :USING 760iRi 

080 DISPLAY AT(2,25):USING 770:T; 

090 DISPLAY ATI1, I):USING 750:SC! 

100 GOTO 1210 

110 IF vl=120 THEN vl-108 

120 Vl=»Vl+4 :: Z=Z+0.2 :: R-R+I :: T=T- 

130 IF Z>3.3 THEN Z-3.3 

140 DISPLAY ATI1.25) :USING 760:R; 

150 CALL S0UND(10.700, tO) 

160 DISPLAY AT(2,25> :USING 770lTt 

170 Wl-0 

1B0 WI=Wl*l 

190 SC=SC-»100 

200 DISPLAY ATM. 1) sUSING 750:SC; 

210 IF 3C=4000 OR SC=10000 THEN IF VIES 
■O THEN GOSUB 3650 

220 IF Wl-4 THEN 1230 ELSE HBO 

230 EN=0 

240 CALL SPRITE(<»28. 96. 8,50.256,0. -15) 

250 FOR V=0 TO 36 :: CALL SOUND (-250. -7 
:: NEXT V :: CALL MOT ION ( H2B, 5,0) 

260 FOR V=0 TO 18 :: CALL SOUND ( -250. -5 

9):: NEXT V :: CALL M0TI0N(»28,0.0) 
!270 FOR A-IB TO 21 :: CALL SPRI TE (HA. VI 
. (RND»15>+1,84, 12B,A"INT(RND«Z)-2.25*A/2 
»SGN(RND-.5).A«INT(RND«Z)-2.25*A/2»SGN(R 
ND-.5) )i : NEXT A 

1290 CALL MQTI0N(»28.-5.0):: FOR V-0 TO 
IB :! CALL SOUND (-250. -6. 7 )! : NEXT V 
1290 CALL M0T10N(<t2B. 0.-15): : FOR V-0 TO 

34 :: CALL SOUND t -250. -7, 12) : : NEXT V 
13O0 CALL DELSPRITE(«2a> 
1310 CALL KEYd.KrSI 
1320 04-12 

1330 ii K>18 THEN 1370 
1340 GOSUB 3700 
1330 GOTO 1310 
1360 W=124 

1370 CALL SPRITEfOl. 92. 11,168. 124) 
1380 GOTO 14 lO 

[390 IF F>23 AMD VIE7. 4 THEN IF R>-3 THE 
N 22SO :i IF F >2 ; AND VIES<4 THEN IF ft< 3 

THEN 3350 
1400 IF EN-4 THEN 1110 
1410 CALL JOYST(t.X.Y) 
1420 CALL KEY! l.K.S) 
1430 IF K-1S THEN 1480 
1440 IF X=4 THEN 1810 
1450 IF X— 4 THEN 1690 
1460 IF X-0 THEN 1750 
1470 GOTO 1410 
1400 CALL POSITIONdtl.D.W) 
1490 CALL SOUND ( 150.210.0,390.0,-6.3) 
1300 CALL SPRITE(»2. 88, 11,0, W. -60.0) 
1310 F=FM 

1520 CALL HCHAR(24,8,42,F) 
1330 CALL MOTION(Hl.O.O) 
1340 W2-0 
1330 W2»W2*1 

1560 CALL C0INC(42. SIS, 23, Dl) 
1570 CALL C0INC<#2,"19.25.D2> 
1380 CALL C0INC<42,#20.25.D;> 
1390 CALL C0lNC(«2.»2I.23,D4) 
1600 IF Dl THEN 1980 
1610 IF D2 THEN 2030 
1620 IF D3 THEN 2080 
1630 IF D4 THEN 2130 
1640 IF U2-3 THEN 1630 ELSE 1330 
1630 CALL DELSFRITE(K2) 

1660 IF F>23 AND virn-4 THEN IF R>-3 THE 
N GOTO 2230 
1670 IF F>23 AND VIES'I THEN IF R I THLN 

3330 
16B0 GOTO 1460 
1690 CALL MOIION(«l, 0.-20) 
1700 01-17 
1710 01-01*1 
1720 CALL COINCitl .401, 16.F3) 



1730 IF F3 THEN 3350 

1740 IF 01>=21 THEN 1460 ELSE 1710 

1750 CALL MOTIONCal.O.O) 

1760 01=17 

1770 01=01*1 

17B0 CALL COINC(»l,»OI, 16.F3) 

1790 IF F3 THEN 3350 

1800 IF 01>=21 THEN 1410 ELSE 1770 

IB10 CALL M0TIDN(H1.0,20> 

1B20 01=17 

1830 01=01+1 

1840 CALL CO£NC(4I,«01. 16.F3) 

1850 IF F3 THEN 3350 

I860 IF 01>=21 THEN 1450 ELSE 1830 

1870 VIES=VIES+1 :j CALL MOTION ( »1 ,0. 0) 

IBBO CALL P0SITION(»t,Q.W) 

1B90 CALL SPRITE(»1. 100,7, 168,W) 

1900 FOR 1=0 TO 30 :: CALL SOUND (-500, -7 

,1);: NEXT I 

1910 FOR G=IOO TO 108 STEP 4 

1920 CALL PATTERN(«1,6) 

1930 FOR D=0 TO 10 :l NEXT D :: NEXT 5 

1940 CALL SPRITE(«1,92,6. 16B. 119) 

1950 CALL HCHAR(23.2,42. VIES) 

1960 IF VIES=4 THEN 3170 

1970 GOTO 140O 

1990 CALL DELSPRITE(»2) :: CALL PATTERNS 

18,104) 

1990 FOR 1=0 TO B :: CALL SOUND (-10O, -7, 

lO) : : NEXT I 

2000 CALL DELSPRITE<#1B) 

2010 SC=SC+100 :: EN=EN*1 

2020 GOTO 21B0 

203O CALL DELSPRlTE(tt2):: CALL PATTERNS 

19. 104) 

2040 FOR I-O TO 8 :: CALL SOUND l-lOO, -7, 

10) J : NEXT I 

2050 CALL DELSPftITE(*19) 

2060 SC=SC+100 :s EN-EN+1 

2070 GOTO 2180 

2080 CALL DELSPRITE(«2):i CALL PATTERN(# 

20, 104) 

2090 FOR 1=0 TO 8 :: CALL SOUND (- 100. -7. 

10):: NEXT I 

2100 CALL DELSPRITE(*20) 

2110 SC=SC*100 :: EN-EN+1 

2120 GOTO 2180 

2130 CALL DELSPRITE("2):: CALL PATTERNdt 

21. I04> 

2140 FOR 1-0 TO 8 i: CALL SOUND (-10O. -7, 

10):: NEXT I 

2150 CALL DELSPRITE(#21) 

2160 SC=SC+100 :: EN-EN *1 

2170 GOTO 2180 

2180 CALL SOUNDIIOO. 320. 0,390.0, -8. 1S> 

2190 DISPLAY ATfl, 1):USING 750:SCl 

2200 IF SC-4OO0 OR SC-IOOOO THEN IF VIES 

>0 THEN GOSUB S650 

2210 GOTO 1390 

2220 REM 

2230 REM •RAVITA1LLEMENT« 

2240 REM 

2250 CALL DELSPRITE(ALL) 

2260 W3-0 

2270 W3=W3+1 

2280 DISPLAY AT I 10. 9>SIZE< 14) : "RAV1TAILL 

EMENT" 

2290 CALL SOUND 1200. 700. 20) 

2300 DISPLAY AT ( 10. 9) S I ZE < 1 4 ) : " 

2310 IF W3=4 THEN 2320 ELSE 2270 

2320 CALL DELSPRI TE (ALL) 

2330 RESTORE 2380 

2340 FOR A=l TO 13 

2350 READ G.H.L 

2360 CALL HCHAR(G.H.L) 

2370 NEXT A 

23S0 DATA 5,16.38.3,17,39,6,13,123.6,16. 

126.6. 17. 127.6. IB. 128 

2390 DATA 6,19,133,7,13.129.7,16.130,7,1 

7, 131,7. IB. 132.8, 16,41,8,17,43 

2400 CALL HCHAR(4,21,37.9) 

2410 CALL VCHAR(5,29,37.4) 

2420 CALL HCHAR(B.21,37,0> 

2430 CALL VCHAR (3, 2 1 . 37, 3) 

2440 DISPLAY AT (3, 21 ) SI ZE 15) ; "BONUS" 

2430 B-300 

2460 DISPLAY AT ( 7, 21 ) SI ZE (4) iBl 

2470 CALL SPRITE(»10, 136, 12,63. 121) 

2480 FOR D-0 TO IOO :: NEXT D 

2490 Al-7 it Bl-16 :: A2-7 :: B2-17 ti A 

3-600 :: A4-7 i: B4-15 

2500 W4-0 

2510 W4-W4H 

2520 CALL SOUND (-2000, A3. 10) 

2530 A1«A1+1 :: Bl-Bl-1 

2340 A2*A2*l :: B2-B2+1 

2350 A4=A4*I ;: B4-84-1 

2360 A3-A3+33 

2370 CALL HCHARIA 1 , Bl , 37) 

2380 CALL HCHAR (A2, B2, 36) 

2590 CALL HCHAR (A4. B4, 42) 

2600 IF W4-14 THEN 2610 ELSE 2310 

2610 RANDOMIZE 

2620 W-INT(RND<M65>*33 

2630 CALL KEY<1,K,S) 

2640 04-14 

2630 IF K-18 THEN 2690 

2660 GOSUB 3700 

2670 GOTO 2630 

2680 Q- 163 

2690 CALL SPRITE (dl, 92. 1 1, 16H.W.-10.O) 

2700 CALL JOYSTd.X.Y) 

2710 CALL POSITION(«1,0,W) 

2720 CALL GCHAR (0/B. W/S, P) 

2730 IF P-36 OR P-42 THEN 3030 

2740 IF 0<40 THEN 3050 

2730 CALL C0INCOI1 ,fl0,4,C6) i ■ IF C6 THE 

N 2B50 

2760 IF X--4 THEN OOSUB 2810 

2770 IF X-4 THEN OOSUD 2820 

2700 IF X"0 THEN G03UB 2830 

2790 IF Y--4 THEN GOSUB 2840 

2000 GOTO 2700 

2010 CALL M0TI0N(»l,-10,-9) t 1 CALL SOUNO 

(-230,-6. 13)1 i RETURN 

2020 CALL M0TI0N(»I. -10,9>lt CALL SOUND ( 

-230.-6. 13) i : RETURN 



2S30 CALL MOT10N(tl,-lO,O) : : CALL SOUND I 

-2SO.-6.25>:! RETURN 

2S*0 CALL MOTION(»l.-I,0»i: CALL SOUND)- 

25O.-7.20H: RETURN 

2830 CALL SPRITE (»1 , 92, 1 1 . 68, 121 .o,y> : i 

FOR N-0 TO 100 it NEXT N 

2860 CALL SPRI TE (BIO, 140. 12. 65. 121 ) 

2870 L-l t t I-lIO 

2880 W3=0 

2890 W5=W5*1 

2900 L=L*I t: 1-1*60 

2910 CALL HCHAR(2*,8.33,L) 

2920 CALL SOUND 1-2500. 1,10) 

2930 IF W5-23 THEN 2940 ELSE 2890 

2940 I-40O 

2950 B=B-10 

2960 SC=SC-10 

2970 1=1*20 

29BO CALL SOUND ( 10, I , IS) 

2990 DISPLAY AT (7, 21 ) SIZE (4) : B: 

30O0 DISPLAY AT ( 1 , I )t USING 7SO:SC: 

3010 IF SC-4OO0 OR SC-IOOOO THEN IF VIES 

>0 THEN GOSUB 3630 

302O IF B»0 THEN 3030 ELSE 2950 

3030 FOR J~0 TO 300 : : NEXT J 

3040 GOTO 32B0 

3050 VIES=VIES*I :: CALL MOTI0N(« 1 . O, O) 

3060 CALL P0SITI0NC«1,Q.W> 

3070 CALL SPRITE1*1. 100.7.D.W) 

30B0 FOR I-O TO 30 :: CALL SOUND ( -300 .- 7 

. I ) : : NEXT I 

3090 FOR G-10O TO 108 STEP 4 

3lOO CALL PATTERN(tl.G) 

3110 FOR D-O TO 25 :t NEXT D :: NEXT G 

3120 CALL DELSPRITE(Hl) 

3130 CALL HCHAR(23.2,42.V1ES) 

3140 IF VIES-4 THEN 3160 

3150 FOR D=0 TO 300 :; NEXT D :: GOTO 32 



3180 FOR 1-0 TO 300 :: NEXT I : : IF SC<t. 

5 THEN 3190 ELSE 3410 

3190 CALL KEY(l.K.S) 

3200 04-10 

3210 IF K-18 THEN 3240 

3220 GOSUB 3700 

3230 GOTO 3190 

3240 CALL CLEAR 

3250 CALL SCREEN(2) 

3260 CALL DELSPRI1E<ALL> 

3270 GOTO 960 

3280 CALL DELSFRITE(ALL) 

3290 CALL CLEAR 

3300 CALL HCHAR(24.8,33.24> 

3310 CALL HCHAR (23. 2, 33, 3) 

3320 CALL HCHAR (23, 2, 42. V ICS) 

3330 F-0 :: R-l 

3340 GOTO 1000 

3350 CALL HCHAR (24. 8. 33, 24 > 

3360 F-0 

3370 GOTO 1B70 

3380 REM 

3390 REM •■CLASSEMENT«« 

3400 REM 

3410 CALL CLEAR :: CALL DELSPRI TE (ALL ) 

3420 FOR 1=2 TO 4 :: CALL COLOR ( I ,9, 2) I t 

NEXT I 
3430 FOR 1-5 TO 8 :: CALL COLOR ( 1 , 4 , 2) : I 

NEXT I :i CALL CDL0R(2.6.2) 
3440 DISPLAY AT 1 1 3, 4) : "RANK SCORE NAME" 
3450 DISPLAY AT ( 1 , 6) i "" •ASTRO-BLASTER" " 
3460 DISPLAY AT (3. 10) : "•" i SC: " • " 
3470 FOR 1 = 1 TO S t: DISPLAY ATU»2*13.4 

34B0 DISPLAY AT ( 13. 4) t " 1ST " ! K 1 t " "IK1* 

3490 DISPLAY ATI 19.4) i "3RD "IK3 t K3« 

3300 DISPLAY AT ( 17.4) i "2ND "iK2l" "IK2« 
3510 DISPLAY AT (2 1 . 4 I : "4TH "IK4|" ":v:4» 
3320 DISPLAY AT I 23. 4 ) : "3TH "iK3(" " ! K3* 

:: NEXT I 
3530 IF CD-I THEN SC-0 :i GOTO 3640 ELSE 

IF SC)k5 THEN GOSUB 3620 
3540 IF SOK1 THEN K3-K4 :: K4-K3 II K3- 
K2 li K2-K1 t: Kl-SC ELSE 3560 
3350 K3»=K4« : : K44-K3* I i K3S-K24 I : 
*-KlS ;: K1S-0* :: GOTO 3610 
3360 IF SOK2 THEN K3-K4 it K4-K3 tt K3- 
K2 t : K2-SC ELSE 3380 

3570 K5*=K4t :: K4«=K3* :: K3*»K2t t: K2 
S-0* :: GOTO 3610 

3580 IF SOK3 THEN K5-K4 || K4-K3 II K3- 
SC l I K5«"K4* l : K44-K3* : : K3*-0» i : GO 
TO 3610 

3590 IF SCJK4 THEN K3-K4 l: K4-SC tl K3t 
-K4* t t K44-0S : : GOTO 3610 
3600 IF SOK3 THEN K3-SC it K3t=-0* 
3610 TF SC<K3 THEN 3640 ELSE CD-I tt BOT 
O 3470 

3620 DISPLAY AT (5, 4) BEEP: " IN5CR1VER VOS 
INITIALES" t: ACCEPT AT (7. I 1 ) S I ZE (9) VAL I 
DATE (UALPHA, ".-'•• "HO» 

3630 DISPLAY AT ( 3. 4) BEEPl " " tl 

RETURN 

3640 CD-0 :i GOTO 3190 

3630 FOR G-l TO 4 i i CALL SOUND (40. 800, 1 
5): l NEXT G 
3660 VIES-VIES-1 
3670 CALL HCHAR (23. 2, 33. 3) 
36B0 CALL HCHAR(23.2, 42. VIES) 
3690 RETURN 
3700 DISPLAY SIZE 19) AT (t)4. 10) ■ "PRESS TIR 



3710 CALL SOUNDl-l.BOO, 15) 
3720 DISPLAY S I ZE (9) A T (04 . 10 
3730 RETURN 




..EXPLOSION 

Si vous en avez ras-le-bol de jouer aux dames. 
Si les 6checs sont trop compliques pour vous, 
Si vous voulez vous eclater les neurones, 
Eclalez-vous avec Explosiones (c'est pour la rime). 

Daniel CHAPELON 

Regie du ieu 

Explosion so |oue sur une grille de 3X5. 4X4 5X5 ou 6X6 

Pour debuter, chois.ssez la grille de 4 X 4 Chaque case de la grille 

pout contemr un nombre maximum de pions egal au nombre de 

cases qui lui sonl honzonlalemenl et verlicalement adjacents Ceci 

signifie que les coins de la grille peuvent conlenir' 

Coin —1 = 1(2 = 2 pions. 



Tl 99 1 BASIC SIMPLE 



Bords — I t i . i , : 3 pions 
Centre — 1 + 1 t 1 h 1 ■> 4 pions. 

On allribue aux joueurs des pions de couleur dilferenle. que chaque 
loueur place sur la grille a tour de rOle, sur une case vide ou de la 
couleur qui lui a die attnbuee. 

Une case explose lorsqu'elle alteint sa capacite (2, 3 ou 4 pions) 
elle se vide alors de ses pions sur les cases voismes qui apres 
explosion se trouvent avec un pton de plus el de couleur idenlique a 
celle da la case qui a explosee Chaque joueur a done la possibility 
de reconquenr des cases en creant une explosion, le plus malin 
n etanl pas celui qui a le plus de cases de sa couleur. mais celui qui 
grace a une explosion en chaine reussil a reconquerir toute la grille 
Remarque: Le gagnant doit arreler le jeu en appuyanl sur n'imporle 
quelle louche des que la grille est d'une seule couleur, appuyer sur 
la touche assez longtemps ontre 2 explosions. 




.r^ONNlERS 

l.E CH.iMI.UN 

FEUQEROU. ESi-ir^oj] 



RQ aioo 

nlCftO TI/99 SIMPLE 
. CARRES i ■ 



■ 

■ 

■ ■ 
-i-,' REM . 
50 REM . 
:■■ REM 

-■ 

90 KEM , 
100 REM 

: :•■ REM 

i:c rem 

130 CALL CLEAR 

140 CALL SCREENI2) 

150 CALL CHARI :!>.:." 34m9BCAOO300FO5G' 

160 CALL CHARU44. "0OAE401D-..- - 

170 CAT-144 

150 CGUL'5 

CLEAR 

. HCHAR < 1.1. 15'j.7G4| 
220 CALL COLOR ( GR, COUL. 1) 

■ ■ 
240 Cl=>19 
230 LO-9 
260 Ll-13 
270 FOR I-CO TO CI 
280 CALL HCHARfLO. I. CAT) 
290 GQSU& 610 
;oo NEXT I 
310 FOR I=LO TO LI 
320 CALL HCMAR(I.Cl.CAT) 
330 GOSUB 610 
34i> NEXT I 

350 FOR I -CI TO CO STEP -1 
360 CALL HCHAR(L1, I , CAT ) 
370 GOSUB 610 
380 NEXT 1 

390 FOR I -LI TO LO STEP -I 
400 CALL HCHARd.CO.CAT> 
410 GOSUB 610 
420 NEXT I 
430 CO-CO* 1 
4*0 L0-L0*1 
4SO Ll-Ll-1 
460 C1=C1-1 
470 IF lOll THEN 270 
480 IF AIGL=>i THEN 330 
490 CAT- 132 
500 GR-16 
510 AIGL-I 
520 GOTO 360 
530 CAT=144 
540 GR-I5 
350 AIGL=0 

560 IF CDUL>I2 THEN 570 
570 CDUL-C0UL*4 
580 GOTO 220 
590 COUL -3 
600 GOTO 220 
610 rF CCUL-3 THEN 640 
620 RETURN 
630 REM 
640 REM 

650 DIM PLAYC2, 10) 
660 FOR 1-3 TD 3 
670 CALL COLQRU, 16. 1> 
680 NEXT I 
690 CALL CLEAR 

700 INPUT "REGLES DU JEU D/N 
~l\'j IF PEPQNSE*="N" THEN 770 
720 IF PEP0NSE»'^"O" THEN 690 
730 PRES-1 
740 G0SU8 5050 
730 GOSUB 4970 
760 GOTO 780 
770 PRES-4 
7B0 DIM AA(6.6> 
790 DIM f>(h,b1 
BOO IF PRE3' ,« THEN B70 
310 CALL CLEAR 
920 PRINT "ETES VOUS PftET A JOUER 

330 PRINT "TAILI.E = = -- S"tl' 



B40 INPUT MAX 

B30 IF M6X't3 THEN 810 

B60 IF MAX^6 THEN 810 

B70 FOR I-I TO MAX 

BBO FOR J-I TO MAX 

390 A«,JJ-0 

900 fiOU. J>=0 

91G NE/T J 

920 NEXT I 

930 CALL CLEAR 

940 fiOSUB 434<J 

950 GOSUB 4970 

960 CC=((32-(MA/«3) 1/21 '2 

970 LL=(<24-(MAX-3) >/2i*l 

9B0 A»«"FF8080808080808C" 

990 B«-"FF" 

IOO0 CS--FF0IO10101010101" 

1010 D»="0101010101010I0I" 

1020 E»»"0I01O101O101OlFF" 

1030 F«="0Q000000000000FF" 

1040 G*-"80BOB080BOB030FF" 

1050 CALL C0L0RC?,2,3) 

1060 CALL COLOR(10,Z,7J 

1070 CALL COLQRIl l.C. 13) 

]■•■"" in "^..t;|.'«...B0a080B0B' , 

1090 CALL CHAftl 104, I*) 

AU CHAR<96.A«> 
II 10 CALL CHAR(97,6*1 
1120 CALL CHAR (98, C*> 
1130 CALL CHAR(9?,D«) 
1140 CALL CHAR(100,E») 
MO'- cr-LL CHAR(10I,F«1 
1 160 CALL CHAR(102.G») 
1170 CALL CHAft(l03,H»l 
1180 CALL CHAR(I12.A*> 



PEPONSE« 



CALL CHAfttl 13. B«) 

CALL CHAR(114,C») 

CALL CHARU [5, Dt> 

CALL CHAR<1I6,E«> 

CALL CHAR! 117, F») 

CALt CHAH 1 1 1B,G«( 

C.M.L CHAR* 1 19. Ht) 

CALL CHAR( 104, A* I 

CALL CHAR<105,6*1 

CALL CHAR(106.C«) 

CALL CHAR 1107. D») 

CALL CHAR ( 108, E») 

CALL CHAR (107, F»l 

CALL CHARU 10, Gt) 

CALL CHARU 11. H«) 

GGSUB 1430 

IF PRES-4 THEN 1 3B0 

PRINT '• EXEMPLE DE JEU" 



1240 

1260 

12 70 

l 280 
'. 290 
13O0 
1310 
1320 
1330 
1340 
1350 
1360 



1370 GOTO 1420 

1380 PRINT "LE GAGNANT DOIT ARRETER":i"L 

E JEU EN APPUYANT": : " SUR N IttPORTE Q 

UELLE TOUCHE":! II11I1M 

1390 FOR 1-1 TO 500 

1400 NEXT I 

1410 PRINT " EXPLOSEZ MAINTENANT": : : 



1420 t 



1460 
1470 

1480 



A2-97 

A3"98 
A4=I03 

A5-99 



1500 A7-101 

1510 A8-100 



1520 
1330 
1540 
1350 
1360 
1570 
1580 
1390 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
I6B0 
1670 
1700 
1710 
1720 
1730 
1740 
1730 
1760 
1770 
1780 

1B00 

B20 

1810 

1820 

1830 

1840 

1850 

1860 

1S70 

1880 

1890 

1900 

1910 

1920 

1930 

1940 

1930 

1960 

1970 

1930 

1990 

2000 

2010 

2020 

2030 

2040 

2030 

2O60 

2070 

2030 

2090 

2100 

2110 

2120 

2130 

2140 

2160 

: i io 

21 HO 

2 1 90 

22O0 
2210 

; ■ 

2230 
2240 
2230 
2260 
2270 
22BO 
2290 
2300 



GOSUB 21O0 
A9-32 

RETURN 

FOR L-LL TO LL+<3*MAX>-3 STEP 3 

FOR C-CC TO CC* I 3-MAX) -3 STEP 3 

GOSUB 1630 

NEXT C 

NEXT L 

IF MAX06 THEN 1620 

CALL HCHAR U, 1.32.32) 

GOSUB 4780 

GOSUB 4B30 

GOTO 3600 

REM DESSIN D" UN CARRE 

CALL HCHAR(L.C.Al) 

CALL HCHAR<L,C*1,A2> 

CALL HCHAR(L,C*2,A3) 

CALL HCHAR(L*1,C,A4) 

CALL HCHAR(L*1,C*2,A3) 

CALL HCHAR(L*2,C,A6) 

CALL HCH_AR<L*2,C*1, A7) 

CALL HCHAR(L+2,C+2,A3> 

CALL HCHAR{L + I,C*1, A9) 

RETURN 

REM ENTRE COORDONNEE 

CALL S0UND(-290,200, I0> 

CALL HCHAR(23.24, 32) 

CALL HCHAR(23,2B,32) 

IF <PRES-*1) + (PRES»2) * (PRES«3> THEI 1 



-PY 



GOTO 1770 

CALL KEY (O, STATUS, KEY) 

IF KEY-0 THEN 1830 

Y-STATUS-4B 

CALL HCHAR(23, 24. STATUS) 

FOR 1-1 TO 100 

NEXT I 

CALL SOUNDf-210.800. IO) 

CALL KEY(O.STAT.KE) 

IF KE-0 THEN 1720 

X=STAT-4B 

CALL HCHAR(23.2a,STAT> 

RETURN 

CALL HCHAR{23,24,4B*X) 

CALL HCHAR(23,28.48»Y) 

RETURN 

REM VALLEUR CARRE 1 

M = ! 12 

pa ■ 1 1 j 

A3=114 



A7-117 
AS- 116 

RETURN 

REM CALCUL LIGNE EI COI.OrlNE 

C-(1V-1>»31+CC 

L-((X-1)*3)*LL 

RETURN 

REM CARRE 2 

AI-104 



A2- 



310 



i..'. 



AS tOfl 

RETURN 

REM CONTROL 

B-X + Y 

C0NT*=0 

IF <X^MAX)>- (X : 1 ) THEN 2310 

IF (Y.MAX) * (Y< I) THEN 2310 

IF AA(X.Y)-0 THEN 2340 

IF AAtX,Y)=JO THEN 2360 

CONT-1 

CALL SOUND (I 0,300, 10) 

GOTO 2360 



2330 


TEST !J0)-TEST(J0)»1 


3540 


2360 


RETURN 


3330 


23 7t 


REM POINT JO 1 


3560 


2380 


IF AAIX,YJ=JD THEN 2400 


3370 


2390 


AA(X. Y)-J0 




24 OO 


PTS1»A<X,Y>+I 


3590 


2410 


A<X,Y>=A<X,Yl*l 




2420 


GOSUB 2100 


3610 


2430 


GOSUB 2000 


3620 


2440 


A7-ASCISTR»<PTS1) ) 




2430 


GOSUB 1650 


3640 


2460 


RETURN 




2470 


REM POINT JO 2 


3660 


2430 


IF AA(X,Y>*JO THEN 2500 


3670 


2490 


AA(X, Vl-JO 


3680 


2300 


PTS2-A(X.Y)*1 


3670 


2510 


A<X.Y)=A<X,Y>+1 


3700 


2320 


GOSUB 2100 


3710 


2530 


GOSUB 2140 


3720 


2S40 


A9=ASC (STR* (PTS2) I 


3730 


2530 


GOSUB 1650 


3740 


2560 


RETURN 


3730 


2370 


REM EXPLOSION 


3760 


2580 


EXPLO-0 


3770 


2570 


II-O 


3780 


2600 


JJ=0 


3790 


2610 


11-11*1 


3800 


2620 


JJ-JJ*1 


38 10 


2630 


Y-II 


3820 


2440 


X=JJ 


3B30 


2650 


GOSUB 2740 


3840 


2660 


IF AUI, JJ) >-AIGX THEN 26BO 


3B30 


2670 


GOTO 2690 


3B60 


2680 


EXPLO-1 


3870 


2690 


IF EXPLO-1 THEN 2730 


3BB0 


2700 


IF JJ<MAX THEN 2620 


3890 


2710 


JJ-0 


3900 


2720 


IF IKMAX THEN 2610 


3910 


2730 


RETURN 


3920 


2740 


REM COORDONNES EXPLO 


3930 


2730 


3-X+Y 


3740 


2760 


XX-X 


3930 


2770 


X-Y- 


3760 


27 BO 


Y-XX 


3970 


2790 


IF ( ( (X-1)*(Y»1>* fX=MAX>*(Y-MAX> >•< 


3930 


(S<>2)*(SOMAX*l)*<SOMAX»2>>)THEN 2B10 


3990 


2B00 


GOTO 2920 


4000 


2810 


IF (S-2)*[S=MAX*1)*(S=MAX»2) THEN 28 


4010 


20 ELSE 3230 


4020 


2820 


IF (X-l)*(X=MAX>THEN 2930 


4030 


28 30 


Xl-X-1 


4040 


2B40 


Yl-Y 


4030 


2830 


X2-X 


4060 


2S60 


Y2-Y-1 


4070 


2870 


X3-X*l 


4080 


28B0 


Y3-Y 


4090 


2d90 


X4-X 


4100 


2900 


Y4=Y*I 


4110 


2710 


AIBX-4 


Mill 


2920 


GOTO 3240 


4120 


2930 


REM COIN 


4130 


2940 


IF XT»Y THEN 3000 


4140 


2950 


Xl-X-1 


4130 


2760 


Yl^Y 


4160 


2970 


X2=>K 


4170 


27B0 


Y2°Y*I 


4180 


2770 


GOTO 3230 


4190 


3000 


REM 3 COINS 


4200 


3010 


IF X-Y THEN 30BO 


4210 


3020 


REM 1.8 


4220 


3030 


Xl-X 


4230 


3040 


Yl-Y-1 


4240 


3030 


X2-X*l 


4230 


3060 


Y2-Y 


4260 


3070 


GOTO 3220 


4270 


3080 


REM 2 COINS 


4280 


3070 


IF X-MAX THEN 3160 


4270 


3100 


REM 1,1 


4300 


3110 


Xl-X 


4310 


3120 


Yl-Y*l 


4320 


3130 


X2-X*l 


4330 


3140 


IfZ-Y 


4340 


3150 


GOTO 3210 


4330 


3-160 


REM 8,8 


4360 


31/0 


Xl-X 


4370 


SlBO 


Yl-Y-I 


4380 


3170 


X2-X-I 


4390 


3200 


Y2-Y 


4400 


3210 


REM 


4410 


.'.220 


REM 


4420 


3230 


AIBX-2 


4430 


3240 


GOTO 3380 


4440 


'.'. SO 


i f [i n:;i-[< . 


4430 


3260 


IF X/Y THEN 3420 


4460 


3270 


IF v-MAX THEN 3350 


4470 


32B0 


Xl-X 


4480 


■■270 


Yl-Y*l 


4490 


3300 


X2-X 


4500 


3310 


V2-Y-1 


4310 


'.■■■ 


X3-X*l 


4320 


3330 


Y3-Y 


4530 


3340 


GOTO 3410 


4340 


3330 


Xl-X-1 


4530 


3360 


Yl-Y 


4360 


3370 


X2-X 


4370 


3330 


Y2-Y-I 


4580 


3390 




4390 


3400 


Y3-Y 


4600 


3410 


GOTO 3570 


4610 


3420 


IF Y-l THEN 3300 


4620 


3430 


Xl-X 


4630 


3440 


Yl-Y-1. 


4640 


3430 


X2-X 


4630 


3460 


Y2-Y*l 


4660 


3470 


X3-X-1 


4670 


34BO 


Y3-Y 


4 680 


3490 


GOTO 3360 


4690 


3500 


Xl-X 


4700 



X3-X-1 

Y3-Y 

REM 

AIGX-3 

REM 

RETURN 

ON PRES GOTO 36 10, 3640. 3670, 36B0 

GGSUB 33B0 

PRES-PRES* 1 

GOTO 3690 

GOSUB 3580 

PftES-FRESft 

GOTO 3690 

GOSUB 3550 

TEST (JO) -0 

REM 

JO-JO* 1 

IF J0>2 THEN 3730 

GOTO 3740 

J 0-1 

GOSUB 4740 

GOSUB 1760 

GOSUB 2240 

IF CONT-1 THEN 3740 

ON JO GOSUB 2370,2470 

GOSUB 2370 

IF EXPLOOO THEN 3B20 

BDTO 3900 

A (II, J J) — I 

CALL SOUNDl'100,-3,3) 

GOSUB 1430 

CALL SOUND(-lOO,-7,2) 

GOSUB 1650 

ON JO GOSUB 2370,2470 

ON AI8X GOSUB 4220,4240,4310,4410 

REM 

REM VIDE 

IF EXPLO-0 THEN 3600 

TT-TT+1 

IF PRES-4 THEN 39B0 

IF TT<10 THEN 3790 

PRES-4 

GOSUB 5610 

GOTO 810 

REM 

CALL KEY(0,H,K) 

IF K-0 THEN 3790 

FOR 1-1 TO MAX 

FOR J-l TO MAX 

IF AACI,J)-1 THEN 4030 

IF AA(I,J)-2 THEN 4070 

TDTALI-TOTALl'I 

GOTO 4080 

TOT0L2-TOTAL2*! 

NEXT J 

NEXT I 

CALL CLEAR 

PRINT " LE GAGNANT EST"![ii 

IF TOTAL 1>T0TAL2 THEN 4150 

GAIN-2 

GOTO 4160 

SAIN") 

FOR 1-1 TO 10 

CALL HCHAR (12. 1 1 * I , PLAY (GAIN. I) ) 

NEXT I 

CALL KEY(O.DDD.FFF) 

IF FFF-0 THEN 4190 

END 

PRINT "AIGX FAUX" 

RETURN 

X-Xl 



X-Xl 

Y-Yl 

ON JO GOSUB 2370.2470 

X-X2 

Y»Y2 

ON JO GOSUB 2370.2470 

X-X3 



Y-Y2 

ON JO GOGUB 2370.2470 

X»X3 

Y-V3 

ON JO GOSUB 2370,2470 

X-X4 

V-Y4 

ON JO GOSUB 2370,24 70 

RETURN 

CALL CLEAR 

PRINT "NOM JOUEUR 1 "n 

IF PRES-4 THEN 4370 

PRINT il" TI 99 

GOTO 4600 

INPUT MOM* 

FOR 1-1 TO 10 

CALL GCHAR(23,3*l,PLAY( 

NEXT I 

CALL CLEAR 

PRINT "NOM JOUEUR 2"lltl 

IF PRE9-4 THEN 46B0 

PRINT " DUPONT 

OOTO 4690 

INPUT NOM* 

FDR 1-1 TO 10 

CALL GCHAft(23,3*I,PLAYC 



I 



-JO 



Suite page 21 



HUNTER 



Voici un programme cree et concu par une lectrice ! Ce 
logtciel ludique dune Ires bonne qualite graphique. uti- 
lise de tres bons trues propres a Hector, ce qui, dans 
un jeu. ne gate absolument rien ! 

Annie ROBLES 

N.O.LJ.C: Disdonc. phailo !Les tectrices ri ont pas le droit de baiader 
leurs jolis doigls delies aux ongles finement ourles sur leurs cla- 
viers ? (Zut. /'me suis cassee un ongte !) 



400 
410 

420 

430 
440 
450 
460 
470 
480 



330 
360 
370 
580 



620 
630 
640 
6SO 
660 
670 
680 
690 
700 
710 
720 
730 
740 
730 
760 
770 
790 
790 
BOO 
810 
820 
830 
840 
B30 
S60 
870 

eso 

890 
900 
910 
920 
930 
940 
930 
960 
970 
980 
990 
1OO0 
1010 
1 020 
1030 
1040 
1030 
106O 
1070 
1080 
1090 
1100 
1110 

1130 




HECTOR 



vd"te;: 



100 

no 

120 
130 
140 
130 



200 
210 
220 
230 
240 
230 
260 

270 

280 
290 
300 
310 

320 
330 

- - ■ ■ 

sso 

MO 

370 



III ANNIE ROBLES It* 
ttt in 

Itt VOUS PRESENTE ttt 
m til 

ttlSCN JEU D'ARCADEtlt 
«tl (ll 

HI THE HUNTERS It* 
tti .LES CHASSEURS. Itt 
tit Itt 

ttt SUR HECTOR 2HR*ttt 
It* ttt 

■It EN B III If t 
•■> tit 

illltlllliliiiitiilui 

IIItllltUDIItlllltltl 

1CARACTERES SRAPHIQUESt 
lillitltttiiiiiittltitt 



■ : hi pe: goauD3310 




•E.FF10. 1 
data 8,8 

data 0,0,0,15,95.63,31.13 
Oat* 0,24,35,124.248.240,224,192 
data 0,24.24.24.60.126,235.235 
data 0.24,24,24,60,60,60,60 
data 0.0.48,116,127,255,253,253 
data 255,126,60,24,16,16,16,16 
data 16,24,56,60,60.60,62,126 
data 126, 126.233,254, 120, 16, 16, 16 
data 7,15,63,123.232,235,31,10 
data O, 128,248.234,255,254,249.248 
data 4,8,16,143,86,84,56,126 
data 145,219,219,219,255,233,253,255 
data 219,219.90,24,24.60,60,24 
flata7,3, 1 , 1 , 1 , 15. 31 , 63 
data 127. 255, 1, 1, 1.3,3,1 
data224, 192, 128, 128, 12B. 240, 248, 252 
data254.255, 128. 12B. 12B, 192, 192. 128 
re»tore240 
for l»tF9Cl to &FA4A 

poke I.V 

next 

poke &5FE3.&C1 

poke fc9FE4,*F9 

A*-chr*< 192> 

B*=chr*(193) 

C*-chr»C194> 

D*-chr»(193) 

£*-chr»I196l 

Ft-Chrt! 197) 

S*-chr»(1981 

H*-chr*(199> 

I*-chr*<200) 

J*=chr*<201> 

K*»chr»<202) 

L»-chr*<203> 

rt*"=ehr*<204) 

N*-chr*(203> 

0*-chr»(206) 

P*-ehr*(207) 

Q*-chr»{208> 

SC-Oi CH-3i BALLE-3 

' IIHIIIIIIIIIIII 

■ ttPRESENTATlONtt 

■ lilllltttlttllfl 
color 4,3,2,3 

eutpufOUOl LA CHASSE EST QUVERTE HI 

plot 37,180,6,64,2 

plot 24, IBO, 32.6,2 

plot 64,180,6,64,2 

plot 70. 153, 13,6,2 

plot 81, 180,6,64,2 

plot 97, 180.6,64,2 

plot 103,180,20,6,2 

Plot 103,133, 12,6,2 

plot 103,122.20.6,2 

plot 30.80,4,40,1 

plot 34,62,8,4, 1 

plot 42,80,4,40, 1 

plot 5O,BO.4,40, I 

plot 34,44,9,4, 1 

plot 62,80,4,40,1 

plot 70,80,4,40,1 

plot 74,72,4,8, 1 

plot 78,67,4,8, 1 

plot 92, BO, 4,40, 1 

plot 96,B0,4,40, 1 

plot 90,90, 16.4, 1 

plot 110.80,4,40,1 

plot 1 14,80, lO,4, 1 

plot 114,62,6,4, 1 

plot 1 14,44, 10,4, 1 

Plot 128,80,4,40,1 

plot 132,80, 10,4, 1 

plot 138,76,4. 14. l 

plot 132,62, 10,4, 1 

Plot 132,58,4,10,1 

plot 133,33,4, 10, 1 

plot 138,30,4,10,1 

plot 146,80,16,4,1 

plot 146.76.4, 14, 1 

plot 146,62, 16,4, 1 

plot 15B.58.4. 14. l 

plot 146,44, 16,4, 1 

outpufANNIE ROBLES", 30, 220,3 

output'-VOUS PRESENTE",4O.200, 1 

data 173.143, 163. 131.173. 143.117.213 
4. 202,87, 26B, 131, 191, 131 , 244 

rastora-1120 



1210 
1220 
1230 
1240 
3 
1250 
1260 
1270 
1280 
1290 
130O 
1310 
1320 
1330 
1340 
1330 
1360 
1370 
13B0 
1390 
1400 
1410 
1420 
1430 
1440 
1430 
1460 
1470 
1430 
1490 
I300 
1310 
1520 
1330 
1340 
1330 
1360 
1370 
1380 
1390 
1600 



1610 



outpuf'CANARDS EN EVITANT LES P IEGES" . 30. 180, 
output"5UIVANTS: ".30, 170.2 

output"- LES NUASES: CAR ILS FONT ",30.150.3 
outpufFUIR LES 0I5EAUX LORSOU'ON LES " . 30, 




•Jp^totw&g 



40. 



output "TOUCHE ,AU BOUT DE 3 COUPS LA ",30,130,3 

output "CHASSE EST FINIE. ",30, 120,3 

output"- ET LE NOMBRE DE BALLE5 (3) ", 30, 100. 3 

output" > BONNE CHANCE < ",20.60,1 

output". APPUVEZ SUR UNE TOUCHE. ", BO, 20, I 
Z*-ln»tr»( 11 



els 

color 4,3,2,3 

for 1-10 to 240 step 12 

outputs*, 1,20,2 

outputF*, 1,12,2 

outputs*, 1,60,2 

outputH*, 1,32,2 

next 

forX=8to232«tep8:plotX,220,4,6,: 
forX«12to2283tepBiplatX,214,4 
forX=8to232*tep8:plotX, 1B6, 4. 6, 3! next 
forX-l2to228*tepB:plotX, 180, 4 , 6, 3i next 
output"SC0REi",15,200, 1 ! outputSC.51 , 200, 1 
outputE*. B8, 206, 2 
outputF*, 88, 198.2 

output "CHANCES! ", 104,200, l:outputCH, 150,200,: 
outputE*, 166,206,2 
outputF*. 166, 198,2 

output "BALLESi " , 176, 200, 1 ! outputBALLE, 220, 201 
mXI (IS) 



.,6,3:next 



forl-ttolS 

Yl(I)-int(rnd(70.130)) 
XI (I)-lnt (rnd UO,220>> 
outputI*,XlU).Yl<I>,3 
output J», XI (1)4-8, VI (I) .: 



' imimi 
• IttJEUttt 
' tlllttllt 

goMiblS60 

Y»30iX-U0 

Al-O 

outputC*, X,Y, I 

Y2-160iX2-0 

output A*. X2, Y2, Oi output B*. X2*8, V2, Ot X2-X 2* 16 

outputC*,X-B,30,0joutputC*,X*B,30,0 

OUtputA*,X2,Y2, 110UtputB*,X2tB,Y2, 1 

X-X+ I (peek (43FFI > and2) /2) «B 

X-X_-< ( peek ( 15FF1) and 1) /DIB 

If f ire <0)-OthenifBALLE>0thengosub 1830 

output BALLE,220,20O, 1 

If CH-<0 then goto2220 

If X-<14 then X-14 

If X->230 then X-230 

outputC*,X,30,l 

1-1 to 15loutputI*,Xl(I> ,YI (I 
Ot next i go«ub 1360 i outputBALLE, 



X2->230 then 
),0ioutputJ*,Xl(I)*8,Y 
220,200,QiBALLE-3i X2-0 

1840 goto!720 

1850 ' ui«u«ii 

1860 ' tttTIRtlt 

1870 ' lliltllll 

1880 ' 

1690 outputBALLE, 220. 200,0 

1900 BALLE-BALLE-I 

1910 Y3-80 

1920 outputBALLE, 220, 200, 1 

1930 Y3-Y3*7 

1940 out put 0*, X,Y3,2 

1930 outputD*, X.Y3-7.0 

I960 output D*,X, 168,0 

1970 -J-pomtfX, Y3> 

1980 If J-3 then goto2120 

1990 If J-lthenoutputD*,X, Y3,0ioutput SC, 31 , 200, Oi 3C-S 
C+lOi output EC, 3 1,200, 1 t output A*, X2, Y2,0t outputBS, X2*B,Y 
2,0igoto2010 

2000 goto2090 

2010 output M*,X2»4,Y2, 1 i outputLt, X2*4, Y2+9, 1 

2020 outputH*. X2*4,Y2,0ioutputL«, X2*4, Y2*8,0 

2030 If Y2-< 73 then Y2-160iX2-0i f or 1-1 to lBioutputl 
i.nai.vim ,0i output j*,xi m *s, vi ci ) ,Oinextigo*ubi560t 
outputBALLE, 220, 200. Oi BALLE-3 r outputBALLE. 220, 200, 1 1 goto 
1720 



1-1 to 



10 



1170 
1 ISO 
1190 
1200 



read Bl,S2itone Sl.S2lne«' 



output" > THE HUNTERS < 

output "ET QUI , LA CHASSE EST QUVERTE" 
outpufVOUS DEVEZ TUER UN MAXIMUM OE". 





2040 


Y2-Y2-9 




2030 


outputN*, X2,Y2*8, lroutputO*,X2,Y2, 1 1 ou 




,Y2*8, 


lioutputO*,X2*8, Y2, 1 




2060 


outputN*,X2, Y2*S,0ioutput0*. X2, Y2,0lou 




,V2*8, 


0toutput0*,X2*B,Y2,0 




2070 






2080 


Q0to2010 




2090 


lfY3->I68thenoutputD*.X,Y3,0iY3-80iret 




2100 


gotol930 




2110 


return 




2120 


outputD*. X.Y3.0 




2130 


for 1-1 to 13 




2140 


outputl*.Xl (I).Yl (11,3 




2150 


output J*, XI (I>*8, Yl Mi.'. 




2160 


next 




2170 


outputCH, 130, 200. 




2180 


CH-CH-1 




2190 


outputCH, 150, 200, 1 




2200 


sound 2, 12ipau*e livound 0,4096 


8,181.163, 


2210 
2220 


' ItllIIllttllM*t«M*f« 




2230 


' IttFIN DE LA PARTIEttt 




2240 






2230 






2260 


MlpeiM-SCicolorO, 1,2,3 




2270 


line 14,226,226,226,1 




2280 


line 226,8, 1 


30,200,2 


2290 


line 14,8. 1 


O.190.2 


2300 


Una 14,226, 1 



2310 
2320 
2330 

2340 line 16,224,1 
2330 data 36, 180. 10.6, 1,32, 174, 4. 20, 1.36, 154, 10, 6, 1 , 46 
,148,4,20, 1,36, 128, 10,6, 1,56, 174,4,46,2,60, IBO, 14,6.2,< 
. 128, 14,6.2,80. 174,4,46,3,84, IBO, 10,6,3.84, 128, 10.6,3,94 
,174,4,46,3 

2360 data 104,174.4,32. 1,108, IBO. 10.6, 1 , lOB. 1 48. 10. 6. I 
,118,174,4,26.1, 118,135.4,13,1.116; 142,4,8, 1,128,174,4,4 
6,2, 132, 180, 14,6,2, 132.128, 14.6,2,131, 154,10,6.2 

2370 restore2350:for 1-1 to 22(read X . Y. L, H.Ci X 1-X»30i 
plot Xl.Y.L.H.Cmext 

- C=l to 3iflaah C,6tnext 
N<SO then goto2520 
N<200 then goto2SOO 
N<4O0 then goto2480 
N<600 then goto2460 
N<5000 then goto2440 
output"E XPERT f,40,90,3ioutputN, 125,90,2tou 
', 160,90, 1 
r340 
2460 output "C R A C K t-,40,90,3ii 
ufPolnt*", 160,90, 1 
2470 goto2340 
2480 output "CONNAISSEUR t" , 40, 90, 3t outputN, 123,90,2iou 
tput"Point*". 160,90. 1 
2490 goto2340 
2300 output"M V E 
uf'Pointt", 160,90, I 
2510 goto2S40 
2520 output "DEBUTANT t " , 40, 90, 3i outputN. 123, 90, 2l outpu 
t"Polnt*", 160,90. 1 
2530 goto2340 

2540 pause 9: wl roi goaub2570i output "UNE AUTRE PARTIE" 
0, IBO. I i output "0 out ou non N" , 60, 140,1 

2550 L»"inkey*I200) iL-asc<L*) i If L-79 then run 1*1 eel' 
-78 then goto2360!elBelfL-17Bor79thengoto23SO 

ii pet col or 0, 1.7.3: for 1-1 to3i f 1 ash 1 , 20 1 next ■ goto26 



2380 f 


2390 1 


240O I 


24)0 i 


2420 1 


2430 1 


2440 o 


tput'Pol 


2430 g 



tputN, 123,90,2ioutp 



",40, 90.31 outputN. 123,90,2ii 



60 
2570 
2380 
2590 
2600 
2610 
2620 
2630 
2640 
2650 
2660 
2670 
2660 



,ne 14,226,226,226,1 

ne 226,8, 1 

ne 14,9,1 

ne 14,226,1 

ne 16.224.224.224, 1 

ne 224.10, 1 

ne 16, 10,1 

ne 16,224,1 



pen 30,30, 170, 23ire«tore2680ifor 1-1 to 10 

l Sl,S2itone Sl.S2inext 

> 173,143, 163,131, 173,143, 117,213,138, 191,163, 
151. 124,202,87.268. 1 31 , 191 . 1 31 , 244 
2690 wlpeioutpuf'AU REV01R" , 50, 120, 1 i pause 3tHlpetend 
2700 data?, 5, 0.0,0. 0,0, 0,0 
2710 data0,0,0,0,0,0,0 
2720 dataO.O, 0.0, 0,0,0 
2730 data64.64,64, 64,0. 224,224 
2740 data216, 216. 72, 144,0,0,0 
2730 dataBO, 80. 248, BO, 24B, 208, 208 
2760 data248, 16B, 160,248,40,232,248 
2770 flat a200. 200, 208,32, BB, 152, 152 
2780 data96, 64, 96, 64, 216, 216,248 
2790 datal92. 192,64, 128,0,0,0 
2800 dat»248, 192,192, 192.192,192,248 
2810 data248, 24,24,24,24,24,248 

2820 dataO, 0,168, 112.32,112, 168,0,0,32,32,249,32,32 
2830 dataO, 0,0, 192,192,64, I2B 
2640 dataO, 0,0, 248, 0,0,0 
2930 data0,0,0,0,0,192,192 
2860 dataO, 0,8, 16,32,64. 128 
2B70 data24B, 132, 168, 16B, 2O0, 200, 24B 
2880 data 192, 64, 64, 64. 240,240, 240 
2890 data248, 9,8,248, 12B, 128,248 
2900 <lata240, 16,16,248,24,24,246 
2910 datal92, 192, 192,216,249,24,24 
2920 data24B, 129, 12B, 248, B, 8, 24B 
2930 d*ta224,160,128,248,136, 136,248 
2940 data24B, 136,8, 16,32,32,32 
2930 dotal 12,80,80,248,216,216,248 
2960 data249, 136,248,24,24,24,24 
2970 d#tat92, 192,0, 192, 192,0,0 
2980 data 192, 192,0, 192, 192.64, 128 
2990 data24, 32.64, 128.64.32.24 
3000 dataO, 0.249,0,248.0,0 
3010 datal92,32. 16, B. 16.32, 192 
3020 dat*248, 136.24,48,0, 112, 112 
3030 dataO, 0,0.0.0,0.0 
3040 datal20. 72,72, 120,200,200,200 
3030 data240, 208, 208, 248. 200, 200, 248 
3060 data248, 132, 12B, 17B, 128, 136,248 
3070 data240,200,200,200, 200,200, 240 
3080 deta248, 128, 128,248, 192, 192,248 
3090 deta24B, 192, 192, 120,64,64,64 
3100 data240, 144, 12B, 128, 1 B4 , 132,248 
3110 data 136, 136, 136,248,200,200.200 
3120 data224,224,64,64,64,224,224 
3130 data24,24, 24,24, 24, 132.248 
3140 data208,208,224,248,216,216,216 
3130 data64,64,64, 192, 192, 192,248 
3160 data248,24B,216, 132,132, 152,132 
3170 date200, 168, 132, 136. 136, 136, 136 
3180 data248,200,200, 136, 136, 136, 24B 
3190 data248,136,24B,192,192, 192, 192 
3200 data248, 136, 136, 136, 132, 152,246 
3210 data240,208,208,248,216,216,216 
3220 data248, 12B. 1 2B, 248,8, 200, 248 
3230 data249,96,96,96,96.96.96 
3240 datal32, 132, 132, 152, 132, 152,248 
3250 dat a200, 200, 200, 200, 200. 208, 224 
3260 data200,200,200, 168, 168,168,248 
3270 dataBO, 80, 80, 32, BO, 216,216 
32B0 data20B,200,240,96,96,96,96 
3290 data248,B, 16,32,64, 132, 24B 

3300 dat aO, 0,0, 0,0, 0,0, 0,0. 128, 64, 32, 16, 8, 0,0, 0,0, 0,0,0 
32, 112, 168,32,32,32,32,0,0,0,0,0,0, 128 
3310 reetor#270Olfor I-I.FB00 to 1FCCF 
3320 read VipoVe 1,V 
3330 next 

3340 pohe tFFOO.Oipofce l-FFOI.IiFB 
3330 return 9 



20 



MILLE PATTES 



Che nest pas Chi faChile de Chasser une Chonillc 
dans un Champ de Champignons. 

Vincent LEVIGNERON 

Mode d'empioi 

En parlanl du haul de lecran. une chenille so dcplace de droite a 
gauche et descend d un cran lorsqu elle renconire un champignon 
Tente? 0a si au moms un anneau arrive en bas, vous 

perdez une vie (3 plus ceiie en jeu au debul voua en flagnea une a 



5000 points plug lous lea 10.000). Sa destruclion lol I 

un bonus proporlionnel au niveau el chaque niveau augrnr-< 

sui la difficutte du |eu 

De temps a aulre, le jeu saccelere a vous den irouver la cause el 

d y remedier 

La premiere hgne du programme doit imperalivemenl etre rempffe 

de 55 caracteres Sera loge un petit programme assembleur qui ser- 

vira a loger un autre programme assembleur en RAMTOP. 

II est vivement consetlle d'enregistrer le programme en (aisanl 

GOTO 9000 avant essaie. car une erreur ds recopiage des codes 

risque dautodetruire le programme lors de son lancemenl 



ecniTyfiC en uioeo normale oes 


l igne 


CARACTERES 












. •87778 






100. 




a La . 












MM, 


,"Q M - u ft ' 




." a e o e 




. CH-AE-QvCft- 












. O O" 














r 130 . 




7260. 










. E ■ 



PIAT T*r?V <*i->xxxxxxxxx 

9 rem 

10 REM •t»l4IIM«»IUitl>Ul»l 

11 REM t PROGRAMME M M t * IJJ Ja * 

12 REM • ECRIT PAR . 

13 REM • VINCENT LEVIGNERON « 
14, REM • POUR 2X/31 * 18K # 

15 REM t , i ,, .. 

16 R =" __ .__,--.__ 

17 rem SuBSBBHiBt 

IS REM LA LIGNE PC 1 DOIT IM- 

pertfirriwe«eKT e~re remplie de 55 

CARACTRReS. 

ae fast 

3<s go&us 3000 

31 oim v*(ie*8) 

32 DIM Z«. 10,51 

33 FOR A-l TO 10 

3* let y»kfli •■■aaaea*" 

35 LET Z».A> ■•■zx/ai" 

36 NEXT R 

37 LET Ytill • , '0S7775" 



270 IF NI>15 TMEN LET UI.4 

sea poke 3afi*7.s-vi 
290 poke 30933. s-ui 
295 po«e aa«.6*,i* 

30* IF NI.3 TMEN OOTO 3*a 
318 LET OleO 
320 LET 02-29 

33a goto saa 

3*a IF Nlift TMEN GOTO 388 

35d LET Dl-l 

368 LET D2-28 

378 GOTO 528 

380 IF NI>9 TMEN GOTO 480 

398 LET Dl-3 

4.88 LET D2>27 

■iia GOTO 523 

4.28 IF M . 12 THEN GOTO 488 

*38 LET DIO 

44.8 LET 02*26 

458 GOTO 528 

468 IF NI>15 TMEN GOTO 588 

473 LET Pl«4 

LET 02-25 

GOTO 52a 

LET Dl -5 

LET 02-24 

POKE 38535,01 

POKE 38539,02 

RflNO NI 

LET A*U5H 38736 

LET P..USR 38833 

LET HL-PEEK 16396t256»PEEK 

PQ|\E (ML+773) -R 

POKE 1ML»?74) 

POKE (HL*773) ,_ 

POKE (ML»74ll ,131 

LET R.U5R 3B893 

IF PEEK 38893-2 THEN GOTO 



2848 PRINT PT 12.11, HUaMBU" 

2038 NEXT fl 

.;070 FOB B»l TO 10 

=oao if sc.vrl y»crj then goto 2 
aSfa next n 

2188 GOTO 3880 

2105 IF Asia TMEN GOTO 2150 

2110 FOR B=9 TO fl 5TEP -1 

aiae let /» ,e.i> -yudi 

2125 LET ZJiBtll aZflBl 

2138 NEXT B 

2148 LET vliAl-CO" AND 5C<18808 

«l*t'0" AND 3C<18008i * l "B" AND 5 

v < lOOOi . (' -0" AND 50-1001 T STR» 5C 

2145 LET Is - ■ •- 

214? LET " 

2158 CLS 




7«lT f R , ^N- 
»1 &JPRXK 



INT AT 10,13. " 

|nT AT 11,13. - 

_- PRINT AT 12.13, •' 

. 3 PRINT AT 13, 13, " 

701 4 PRINT AT 14.13, " 



3»S» LET C-C*l 

8850 NEXT « 

9*63 PORB 16383,49 

336' P0>.E 16389.117 

=a-3 ;^£-= 

92939231 30S33-:>5?5: totaa" :<: 9E5- 

0*DT57ESLFSaaa8aD3EBlC9af-:5 

5i22.t?T-?»?fli; ^ a ^3^52i;c-fEa k - 



AT 15,13, 
"PRINT AT 15,13, 



"■"iAT fl,31,"B 



, 180 



38 LET nai. 
— PR-8 

M 3-2 7775^ 



43 LET 

47 LET 

30 LET 

78 LET . . 

80 LET SU 

90 LET 3C 
100 LET 3* 
110 LET Li 



138 LET 80-0 

198 IF PR-1 TMEN GOTO 205 

208 G05UB 7000 

20 1 SLOU 

282 LET i 

285 CL3 

210 PRlr ■ 



BtM 

518 

B38 

840 

is a 

55 1 

:i :■■■ 

-■8. 

8 :■:■ 

55T> 

s -: a 
B7« 

008 

580 IF NK8 TMCN LET B0-INI*2)» 
100 

590 IF NI<15 ANO NI>7 TMEN LET 
B0-(NI-6l (508 

600 IF ND13 TMEN LET BO-5000 

700 LET SC-SC*iPEEK 30124>»25*B 


718 LET B*=STRt 5C 

728 tiOSUB 6000 

738 PRINT AT 1,8,5* 

735 IF 80=8 TMEN GOTO 770 

748 LET NI-N I*1 

738 LET 0%'"mBMB=" +STttt 80 

768 PRINT AT 12,15-(LEN 0«)/a,0 

778 IF 3C>5000 ANO SU-8 THEN GO 
TO 830 

788 IF 30(3880 THEN OOTO 848 
810 LET W-INT 15C/18B88) 
828 ir SU'W TMEN GOTO 840 
830 LET Ll-Ll + 1-!1 AND LI=>9> 
835 LET SU-SUtl 

848 LET L«-CHR« (CODE I3TR» Li) 
+ 128) 
845 IF LI--1 THEN GOTO 2888 
858 PRINT AT 0,29; LB 
853 LET UI-C'O" AND NI(18)*3TR| 




A! 

2208 NEXT A 

2218 PRINT AT 15 . 0, "ENTREZ U05 I 

tJITIALES i3 LETTHESIPUI5 APPurEZ 

3UR <NEU-LINE> ." 

2228 INPUT At 

2223 LET AlaA-ft" 

2224 PRINT AT Z»4,19,fl|tl TO 51 

2225 PRINT AT 19.0, " 

aaaa let z»izi.fl«a to bi 

2240 IF Z->1 TMEN GOTO 2388 

2250 LET H5s5C 

2260 LET B«e5TRt SC 

3878 S08US 6008 

2288 LET H«.Sj 

£308 FOR A-l TO 100 

2310 NEXT R 

2320 CL3 

2338 PRINT "U0ULEZ-UOU3 REJOUER? 



i CLS 

i 5T0P 

l LET B-LEN SJJ 

FOR A-6 TO 7-B STEP -1 
i LET S»lfl)»CHRi iCODE BKB14 



INT RT 17,6,- 

NT RT 18,6, " 

INT AT 19,6, " 

INT RT 38,6, " 

7898 FOR A>1 TO 25 



P I 1 

IUI | 




e2323aE282877*-;37E2.i22; 5 ; 8 j S -, . 
5FCDAt*753634;93SA.5 733r3aSs7«il* 
L2D47597 
5118 LET AtiMt. 3SAa7SC3rM7SaB7E 

S35E2836 4F;: :- -:■'■;.•,•:-«; 75 ic4e;5 
CS7 5FE01C-: :7t2 3«;;3J5a:aB7E3680 

i:;2 7-^ 3 = E752B28aB7EFE01C-=9676'=» 
lE..^B = 7o235E23232 3364-;DC57SFEei 
':h34767E2B368325 7-C3FE75- 

aisaa23-3SC3FE~S«-52028S-tcig4CC5 
'-575FEaiCA::.75:?" r L7;i-;j;;23i3i;' 

7EaB36882B36aiFEai;aaa353SC3rE75 
3AA97S4E33! ' v. 11232323 

5 2:£aaiiAe7534233*i:9aa 



6130 LET Al-At.'FEaiCAA476C394 

L6aEacaa::'-:>t753-25i.a^E- c 2a;s3RF« 

7 6FE 1620 750^-; '7; _-:■ E :*;C01AF32mS 



.. E 38893.33 

240 IF Nl-5 TH&l LET UI-1 

258 IF NI>3 AND NI<11 TMEN LET 

388 IF NI>18 AND NK18 TMEN LET 



NI 

858 LET N|.CHR« (CODE 

i tCMRf (code utcsi+iae 

368 FOR Aal TO 38 

878 NEXT A 

880 GOTO 203 

■'00 LET LI-LI-1 

iicia let Bo-a 

1823 OOTO 700 

2000 FOR fl-1 TO 30 

2818 PRINT RT 13,1 

2028 PRINT AT 12,1 

3038 PRINT RT 13.1 



Jt hi *iae 



§g£3tf^ 




7130 PRINT 
OE OETRL^R! 

ELLE N-'"ARR! 

7190 PRINT ''EN 8A3 01 

Taae print -pour uoi 

OUS UTILISE-REZ LES 
7210 PRINT 

7228 PRINT BJ'" 

A GAUCHE. " 
7235 PRINT 

7238 PRINT B"' 

A DROITE." 
7235 PAINT 
7240 PRINT B - " 



L' -ECRAN. 
DEPLACER 
OUCHES: " 

; POUR ALLER 



: POUR ALLER 



:POUR TIRER. 



8148 LET A»-A|*"16FF3A0a?782FE03 
2306F£lDa8M L88S L(J B8 ~^ 328 17 72 108 

77*EaClE16COA0 75 3&CaiCOOC2a[)753e 

«3 8232 336 3^2 18377^£2 3362B77*r 100C 

C0A07536338D1CCDAD753682 2 336B4 23 

3601" 

8158 LET At*Af 183621FF767EFE16 

280836l62 37E3C23 2 3 77 3AFr763033FF 

765F3A8277ircr^w'7J.7-'-s32322FE3* 

232636 173Ea*a6FFiaFE3CFEa323'73e 

aa3AFF76FE82280521FF763616C31*77 

588»aiflC?( . ^57721AC75 



. _47123975C3C77233D303D77233C77 
233D77a33C3C77aC2310E7368023368C 
23363a233630a336eoC9- 



7245 PRINT 
7230 PRINT '■ 
N ANNEAU DE 
RAN3F0RMERA 



SI U0U5 TIREZ 5UR U 
LA CHENILLe IL SE T 
EN CHAMPIGNON, ET 31 
SUR ■-■ 



. CHAHPICNON I 






V J i 

7a ia 

73 11 

7 a 1 ■: 
7o i : : 

7 ■.ll 6 
7 .7 1 7 
73 1£ 



'mm 



7290 GOTO 7268 
6008 LET A} "- : 
— if 



EO481O40O3838 311AD7 
.a93PFE082af " 
iVteJSS 1 ■.'00380898612 13a368697EF 



PRINT AT 9.13 



38flfcF26a33 
137ED42C1" 
ESOCSlBOC. 

802§ fSr Sli*?0*LEN A« STEP 3 
8038 LET B-16«C0DE A« IR) *CQDE fit 
Ifltl) -476 
8048 POKE C.B 



192a2«l-D29192232*aC33E0i5FaEaaCO 
ACi7536a?a£lrCDaLi7335e93CFC1328EC 
7J 13F703ia 3 23 3&aaC 04 170 21 3F765CCD 
A07a366921487a347CFE042ace2e3*3* 
" E -8C5" 

.. fl|-A«t"31AB7S7EFE14aa06 
21AD7 8 36aiC920fi9 7523 7CFC163a062l 
AO 763602C9C0a 3 773 AFF76rE 162309 3C 
04a5FFiaFE30FE802aF71BCC7eFE8aCfi 
EB7736aOC9'■ 
8198 LET A»-A|."l' 
6200 LET A-U3R 16514 

saio Clear 

S228 RETURN 

9000 save "centiped«" _ 

9810 run • 



ORIC 1/ATMOS 



50369 DRAM9 1,9.1 
593ri WflWe.Rl.l 
56373 DPmU-91 e.l 
5Q375 r-PRUO,-ei.l 
50388 Hl=160 Vi"10 H«-' 






^^f Suite de la page 5 

582S0 DRAU8.-10.1 

58265 R»--r«d*r*.Vl-l85 Hl-36 V2*8 
-«-6 IWP-1 G0SUe45898 
5827B A*--dii-.- vi*18S Hl-99 V2-0 

2-6 ifp-i cosue45eee 

38272 Vl-126 Hl-97-lfP-l M2-8 V2-8 MP-t H2--5 V2=0 COSije45O00 

a»-"3- Gosije45eee 58392 cwsErae-ici 

58273 CURSET 188, 168.1 50384 t«HU108.O.l 

58298 FOR r-i TO 2 CIRCLE!. 1 NEXT 1 58386 C*fiue.56,l 

38298 R8-STP8<ChR) L-LEHXR«> A»--FU 38388 0RflW-tO8.O.l 

EL -*RICHT»:A»,L-1 > 58398 DPRU8.-36.1 

58291 VI-137 Ht-118 1FP-1 H2-6 V2-8 38395 H»*"HeC&EFGHI jvlMNOPOP" HI-28 

C08t049eee vi«i imp=i H2-6 yi>e un-^i 1^45080 

58294 CURSET188. 178.1 »' ^gSSilJIl -1 * ''*'** 

58295 FOR 1-1 TO 2 ■ CIRCLE!. 1 NEXT ft H2-0 '^T'\ r '^ "'" 
58388 A^-STR^nxY, l-LEN<m»>.R4»--0X 58402 FOP I=0 TO 88 STEP -, 

yCEME -*riwt«r*.l-i> * ■■r-ri^a.18.1 

58381 Vl-167 Ml-110 IMP-l H2-6 V2-8 58466 1*mM0.5*.1 

G0S"je^3888 50408 HE/T I 

583« CURSET188, 188,1 58418 FOR !•? TO « STEP 8 

38387 FOR 1-1 TO 2 CIRCLEI , 1 HEXT I 58412 V£*]<?' x ** 1 ' 1 

PPILLES -*PIGHT«H»,L-I > 504|8 HE/T I 

58309 Vl-1?7 H1-1I8 InP-I M2-6 V2-0 58428 W 1'0 TO 3 



56638 Hl-5 Vl-133 EFF-12 HRUT-48 W 



56668 FOR 1-1 TO 11 

56678 CUPSET33.87*!,! 

56680 DRHW76-0.1 

56690 NEXT I 

56700 fl*-MM» Hl-36 Vl-90 IMP-2 H2-6 

V2=8 OO&iJ8450e0 

56718 RETURN 

57888 Q£l\j"/ss l "',""/"s"""" 

POSITION.ECRITURE '■ 



60870 (FP« '"H'THENfieeSe 
600S0 PRIHTCWW12) INX3 
60098 PRIMT PPINT PRINT PRINT 
60100 PRINT- "CHR9<2?Ji"J 
ftuf»voir I" 
601 1C< PRINT" 'XHR«27'»"J 




coeueiaeee 

38310 C1JRSET288, 178.1 
58312 DRRU38.0.1 
58314 DRAMS, 16. I 
58316 ORRU-38,8.1 
58318 DtW48,-16.1 

58328 R*-*vit*«»* , 'Vl-16e H1-195-H 
P-l H2-6 '/2-8 C0SU843888 

58322 R«--08" MI-218 Vl-173 IIR'l ' 

2-6 v2-e Gosue43eee 

58323 Hl-95 Vl-156 EFF-3HAUT-6 GOS 58442 NEXT I 
'je48880 58444 FOR 1-0 TO 32 

38327 Hl-97 Vl-133 EFF-2 HRUT-7 COS 38446 r.UPSET20, 34. 1 , 1 
0848803 50448 DRAW12.8.1 

50338 Ml-93 Vl-166 EFF-3 MfiUT-6 COS 58438 NEXT 



90422 GUWET2»,H 
^>42d W?HU90.0 1 
50426 HEXT I 
50428 FOR 1-8 TO 8 
50430 CIJRSET20.18+I, I 
58432 DRAW 7 8.0. l 
50434 NEXT I 
50436 FOR 1-8 TO 16 
50438 OJPSET28, 26*1.1 
58448 C>RhU24,8.1 



57010 REM'--.. 
: 57828 PEM"' 

37022 R8-CHR«' l27i*CHfl*:l27i*CHR«l 
27i*CMR«(127»»CMR«< 127) 

57024 Hl-84 VI-73 IW-8 V2-8 H2-6 G 
05UB4SWe 

57826 P08-"" 

37028 IF [NT(SX^3-S/.-3 THEN PO«-CH 
P«r64*<SX.3?>* ,, 3-" GOTO 37032 

37030 PIt-STR»<SX-< IHT'SX/3>t3>> L- 
LF»KRI»> R1«-RIGHT«'RI«-L-1 '< 

37031 P0*-CHP»'fc5»INT'SX'3>>*Rlt*-- 

57832 PU»--" 

57834 IF |HT(5Y'3)-ST/3 THEN PW-CH 
9%>4f}*<^(.-i> ■*■•}■■ GOTO 37838 

57836 Rlt-STPtfS.V-' 1HKSV.-3 >f3>) L" 
IEHCPI1) RI»-RICHT8'.PI8,L-1 > 

570^7 PU4J-CHR«<49*IHT'.SY/3>>4RI» 

57838 H»-POa*PU« Hl-84 Vl-73 IMP-1 
H2-6 V2-0 GOSUe45808 

57840 RETURN 

60080 REM''''^"^' FIH/z/'f//"/"''" 
'60810 PIMG PPIHTCHR»< l2>PflP£R4 ir* 



50455 HI -30 
58333 Hl-97 Vl-163 EFF-2 HFHJT-7 COS -6_V2-8JMR; 



u- 68020 PRl»T PRINT PRINT 
" Z 68838 PR!HT"VOULEr VOUS RETENTER VO 
TRE CHRHCE T r 



1-73 h*-"PQSIT10H 
GOSUB43088 
W588 ft..CHR«<127..CMR«(127>*CHRt<l g^^ „,!„!-< 0/N. 
58333 Hl-95 Vl = 176 EFF-3 MRUT-6 GOS 27 ''CHR* 127 >*CHR*K 127> 6<H2<A 08T81 . 3-8. 8. 3. 3. 6. 6. 8-5. 0.8- J 

848888 38318 Hl-36 Vl-133 IMP-1H2-6V2-8 .5,0, 6 , ,3. , e , 3 , 6 ,o,4,o. 12. 0.0.8.0r 

38337 Hl-97 VI 



38338 Hl-92 Vl-187 EFF-8 HfiUT-18 GO i 



11-36 Vl-133 IMP-1 H2-6 V2-I 

™ r -SS^CHR.,,27.CKR« 1 27,.CHR.<.^ 3fl DATR0. ,0.0.0.6.6,0. 3.0.3.0-8 
■CHRK 127>*CHR«' 127> 3.3.0,0 

JI0 Hl-36 vi-143 IMP-1 H2-6 V2-8 6ei48 FQPI-1T048 

5eS? SSUtUfwMsv.3 i&SnScHmwnmKU, 

3833? SSPf'*' 1 *»«» H1 " 36 V1 " 13 ' IMP "' H2 " 6 V2 

50360 Ra-STRR'PPO) L-LEN'.fW.' R*-" IM G0Sue43888 
NERSIOH "•RIGHTf<F».L-l > 58635 fl* 



_ CHR«(127i*CHRa^ I27)«-W»" 
T-722 IrV-1 V2-8 H2-6 38636 Hl-36 Vl-139 1HP-1 H2-6 V2-S 

GDS'Je45808 

L=L£N<fl»> h* 50637 H»-OHR»' 127 >4CMW 127>."8«e 
- r^OFONKUR -.PIGHTVfla.L-l* 58630 HJ-36 Vl-167 

30366 Hl-128 Vl-132 IMP-I H2=6 V2-8 GOSi*4300e 
GOS"e4308« 56640 Hl-I 

30367 CURSET148.20.I _^_^^_ 



60150 RER08 

60168 U-18 

68178 IFA-OTHENU-13 GOTO60I90 

6O180 wj'ilCl ■ J.n.0 

68183 PLHY1.0, 1.473 

60198 WH1TH 



58361 Hl-120 i 

GOsr*43e08 

50365 m»-STR»'. 130-PPO' 



. IMP-1 M2-6 V2-I 
V1-133EFF-8 HflUI' 



60208 NEXT 
68218 PL0Y0, 0.0.8 
68228 PRIMTCHRt< 12) 
68230 END 

geese cETRa 

60060 IFR»-"0"THENPUN 



.7199 BASIC SIMPLE 

^W^ Suite de la page 19 



CALL clear 

RETURN 

FOR 1-1 TO 10 

CALL HCMAR<23. 1*4. 

FLAY < JO. I)) 

NEXT I 

RETURN 

. ■180O 
FOR 1-1 TO 12 
DATA 74, 79,8s, £9, 32, 
32.98,61,32,32, 

READ JOUE 

CALL HCHARI23. 13*1, 

JOUE) 

NEXT I 

RETURN 

REH NUMERO DU CADRE 



4720 
4730 
4 740 
.4730 

4/60 
4770 

4 780 
4790 
4SO0 

87,6: 
4810 
4820 

4030 

4840 

4830 

4860 

4070 

4800 

4090 

4900 KK-KK*3 

4910 CALL HCHAR(LL-1, 

CC+KK.MM) 
4920 CALL VCHARU.l.M K, 

CC-l.MM) 
4930 NEXT I 
4940 CALL HCHAR<LL-3, 

(CC*rtAX-l*IMAX/l.3> 
I , Bfl I 
4930 CALL HCHARt (LL+MAX- 

1» (KAX/1.3) I ,CC- 
3,B9> 

49AO RETURN 
4970 REM DRUITAGE 
4980 FOR 11-1000 TO BOO 



■ 
4990 CALL SOUNDf-30, II. 3) 
3000 NEXT I I 

3010 CALL SOUND(1000,-6.3> 
3020 CALL 50UND(1300,-3,2> 
S0UND<20O0.-7.O> 
5040 RETURN 
5030 REM PRESENTATION 
3060 PRINT " Mlllf IM1IIII 



:.....•... i mini 



CARRE EXPL08IP 



i K- 



3100 PRINT "LE JEU C0N9ISTE A CttAROER " 
3110 PRINT "DEG CASES JUSQU'A EXPLOSION" 

3120 FRINT "CHftOUE CASE A UNE VALEUR 

CRITIQUE ■ 
3130 PRINT ll-LCS CAGES DU COlN-2 POINTS 

5140 PRINT "LES CASES DU BORD-3 POINTS"! 

3130 PRINT "LES CASES DU CENTRE-4 POINTS 

' '! i Kl LOS ION PROVOOUE" 

3170 PRINT "LA CONOUETE DE LA CASE 

3IB0 PRINT ^"Le'jIu'sE TERMINI. PM UNI 
EXPLOSION rlNALE"!"LE GAONANT ETANT CC 

5190 PRINT "QUI A C0L0IV1L roul II .H ir 
3200 FOR I-I TO 2000 
3210 NEXT I 



Suite page 23 



LAC ROB ATE 



II etait une fois un clown... Qui passait sa vie a essayer Bret, le mieux est d'essayer, votre TRS se charge de 

dattraper un ballon ou ce que vous voulez ! tout. Ah ! n'oubliez pas de determiner au mieux Tangle 

II etait une fois un second clown qui passait sa vie a de tir avec les touches flechees. 

essayer de lancer un pave ou ce que vous voulez sur 

un tremplin et le tout pour catapulter son confrere et... Daniel BIENFAIT 



I UM2MI rr-3»S«liT-! 

.'-'-.-■ II ■ ■ II . 

3« PMNTa*,-a,ST9l*G»i39.l*3M 



■ QUELWES SECONTJES C€ PATtE'lC 



, c MBT« ■ 



■ER9 IMAGES ■ 



• IU'3l1»L'6t.O»(Ui!S1.'i:?,- ->Ei 
BD*IS>tCH*tBG»IT>iaL-126,DJ*<SH 
29,M*IU>I«.*101,- ■( 



;:i.OE«'i'i 



-■: itoiB:F0RJ-1TO»iSE*DH:T»< t>=T«4I)'CHB»iKi:NE»'TJ, 
;10 Fv»I=lTOftiF0(»J»IT0*ireAI)KiE0»< :i"=BO»< I >*CHH»iK> iREADKiDBti I I 

: ■ t . kCHMCKl !NE«TJ, I 
:.22 FORI"! rOa!FiiRj.iic»:READMBG»( t >=BG«» I l*CHR»ih) tREADKiGB»t I > 
-GP*< ; • ;»«»<)<> :NEIT J,! 

IW FORl = lTOBiFOHJ*STOaiREAl>«iA»l I >-*•( I )»CMB«(K) !PEADK:B1 
( I I«CM*IIK1 iREADKsCK I >"C»( I 1'CMMIKI iNEXTJi I 

!»0 CM»-3TRlf*a*i;, 19l>iCf«*=.<:HR»(139»*CHFl»(!73)>F0RI-irO6'READK:C 
».CtfC»«HKi iNElTiJIIli' 1 ••CWR»(16B)*CHFt*( I 76 1 *CMR» ( 1' 

!J«(;i»ch«»u9!i*!:mr«ii7£.i-cmr*(14*hp*-chr«(i7»>-chr«i 

11371 

150 FOR3-lTC.2:FOnj-lT07i«EAOK:0»<tl-0«tII*CMH*lKUREADK"E 

I I '•CHR»{«> !»EA».:F» 1 1 J-F»t I >*CHR»(K> tNElTJ, I 

16B F0ni*a703'F0nj-lT07JREAD«:G«<II=G«lII»CHR*(K) IREADK 

. ,. : „r»t K , :«^htj, HF03:-ar03:FORJ-l(OaiREADK;K»< ])•«»(! )-CHR*lh 
>SREACKIL»< t)-L»lI>*CHR»(K)!NEXTJ, I 

; n »*"STItINWt*. 131>iB»=STFUNG»t3. 1*0) iC*-STRING*4 3. 176) :D»-STF) 
ING»(3,32):£«-5TR1NG*(*.32>!F»-CHR»(I63>-CHR»<191).CHR»( 
C"R»l IS* >-CHR*< 1831 .CHR»( 1761 -CUR*! 197) -CHR»I180> 
iSa I»< I 1-D«*M*0»-E«-C»»B»*A»:V»M >-£••<:» •B*-F»-D«»D»»E 
A»TJ»*' ■*5«*0»-- ■*e»:X«(2l-StRING*I23.32»iV»t2l-STRING*{lB, 1 

3: >-f«-string«<:b. 131 itZ«(2)*Et'D**' •*«**■ -*rj«-E»:x«t3)-A»»B 

*-:«-;»-£*:** I3i-- -.0»-E»*F4.a*»C»*Dl»- 
198 Z»(3>-' '«E>»»E»*G«+' '-D»*A» 

200 gotousb 

1333 0ATA193, i9], 1S3.1BO,190, 183. 1*3, 133. 190, 133. 167, 1B9, 182, 1 A3 
■ 197. IB?, 18*. 1B7. 191.1 B9, 193, 191, 191. 1B3. 193,191,1*3.189, 193, 139 



i ;3L-132, 



> I : RETURN 



1323 0ATA32. 32. 32. 133,18*. 173. 172, 1B4, 32. 32. 32. 32. 18*. 173, 172, IB 
a, 32. 32,32. 168, 168, 138.1 33. 171.32,32.32. 19B, IB*. 129. 172,173.32, 1 
*3, 32, 1*2. 18*, 129. 172,1 7B, 176. 138. 32,131 , IS*, 129, 172, 17B 
1333 DATA136. IB! . 183, 138. 32. 129,32.32. 136. 181. 18B. 139.32.32.32,3 
2.198. 131.1*8,173.32. 1**. 32. 32. 136.1*9,183.133.32.199.32.32. 136. 

76,129 

,1B8. 133,177,1 
.32,32.32.32,32, 32.32,32,32, 32,32.32, 19B, 1*3,32. 1*7, 19 



., f33. 183.32,32, 1 



.32,32.32,32.32.32.32.1^2, 16B.19B, l*3,19B.l 



I **. 133, 1 99, 32, 32. 176. 32, 32. 32, 32. 32. 32, 32. 32,32, !9B, 1*3. I 



133. 176,32.32. 



•,32.32,32, 32.32,32,32.32,32. 190, 1*3, IS 



,32.32.32,32,32 

1B9B DATA176. 186. 1*9. 173. 191, 176 

IB93 DATA168, 139,32. 1B9. 17*. 198, 191, 139. 177. 191, 173, 17B. IBB, 1 



>, 32. 132,32.32.136.32. 168. 133.1 6B. ! 



I. 178. 186. 191, 



131. I6B. 137, 136.1*1 



,189,1*3,32,32.32.32. 176,32, 



.43.163, 
91, 191, 189.1*3,32.32 
1113 DATA32. 32. 32,32.190, I. 
.32.32,32,32.193,1*3.1*7,1' 
32.32. 19B. 1*3. 147,191,1*8, 
93, 1*3,191,191,138. 1*3. 136 
1 138 GSS'JBllBBBiW-l 
1-63 v« = :nxEV»t IFRND(33>-3i 
B2133 

!1&3 IFVt»--,1163=LSEGOSU2 
1173 tFut--0-.lBBBB 
11W 



*3. 32, 32. 130,32. 1 



.32. 172, 138,198.1 



• 7. 191,172. 132, 14*. 137. 32. 32, 32.32 
'2. 1*3. I **. 134.32.131,32.32.32.32. 

76, 133, 176.32,32.32,32.32,32,32. 1 

1*2,32,129,32 

. < PND< 2 I ) ! GOSUB20*B I GOSUB20aBIGOSU 



■ neons . 



120B CLS:50SUBl*BBiG0Tr.I233 

121 B n-2:GP-192:AR'2*3--G'>SUB2B03'U«l lS0BUB2a2BlS09U12e3B«U-Slfl0S 

■JB2B 23 1 GOSUS2033 

122B PP:.'IT3**e.STPING»<32.32);i5OSUE3*IBJGOTO13B0 

123B M-i:DP'7a6:AP-7Bfi-PNDt2B>:Z-HP3-Afl:B''<RNDO>-3>/21F-6*»RN0 

'3'-P3-567> PRINT a96B.STPINS»< 63. 19! I i :Gf'S'jE22a0:GOSiJB2BeaiG0SJJB2 



220=1 



I.121B 



;3aa s^to3zbb 

1*30 S«=CHR*il3! >*CHR»<1*31*CHR»(189)-CHR»I176> iPRINTaSBB.STRU 
»t 12. 1*3) 13302. STRING* (2. 191 1 J3367. 5*1863*, 5*19731 .LEFT* IS*. 3) ! 
1MB PPINT3448. STRING*! 32. 131 ) i :FGRK»13B71T0163B3STEP6* t POKEK, 1 
UNE/tipf.- .---. 



• MOWErtENTS ' 
;-B33 CC.PL -0PT0ARIP=F 



2B1B PBtNTSL.' '|T1U>;SL 

ITiLirtl=L«REruSN 

202B PB1NT0L.STRINGKU.32 

3L*192,FHU)1!RET\JRN 

233a PRINTaL'l,T*ITT>iaL*( 

GB*1TU»L-I92.CB* I ■ RETURN 

2833 PRINT3C,* * »T«OI (9L-64.G* 

2B43 S-5*RND(3>-2 

2333 IFS,6.S=6 

2360 IFS<l.S«l 

2070 PRInT9L'62,BD*<SI1 

2BBB T*T+f>NDl3l-2 

1B9B IFT>A.T-6 

2183 1FI 1.1=1 

211B PRINT8L'6B.BG*< 

2133 TT=TT*RND(3)-2 

21*0 IFTT>*.TT-* 

2130 IFTT«»TT-2 

216B IFRnD(7)-7,TT-TT»3 

2170 GOSUB2193 

21B3 IFTT^3.TT-TT-3iFCPTP'lT0*BiNE*T:G05UB2I93 

219B RETURN 

2193 PR1NT3L*I.T*(TT)URETURN 

2230 PR[NT3P3-131.X»<ZMaP3*193,Y*<Z>!aP3-239,Z*U>nRETURN 

2220 PR1NT9L.' 'iTSCtM* " 13L*6A.K«( V) I3L*127, • • IL*( V> I3L-191 

. " ' i J*(21 1 i RETURN 

2999 ■••••••• 

• JEU • 

3BBB G0SUE3*10;X-B:G0SUB349BiAl=C05(AiC2*16BB!A2-TAN(A)iL-L(2liF 

0RW=3TO3tGOSUB2B33tFOHTP=lT0l3:NE*TTP,U 

331B V"4.9»Xt2/AI*A2«X 

331 3 I fu; 3, u»w-. 3 :G0SUB2B33 

3B2B PI = INT I (132-X>/2)«6*«(INTHY*10>/3)> 

333B PRINT3P2, ■ • i : IFO*, IFPEEKI 13423-P2 J O320RPEEKI 13*B9»P2> '. 

>320RP2>767,L=LU i:G0T03388 

3033 PRINTaPl.P*iMFPEEKU3337»Pl><: 320RPEEKtl3336-Pl><>32, 0"I2> 

GOTO 33 IB 

3B4B P2=Pi:X=)!*3:G0TO331B 

3 IBB F0RR-lTOM:L=L-6*:GOSUE222B:PRINTaL*239.STRlNG*(*.321i:IFR-3 

:PRINtai.*198,* *I 

3131 0— fc*:0N8A»lGOSUB3*BB,3*lB 

3118 IFZ>3,3133 

3113 IFV<3,V-V-1 

3I2B Z-Z-l :G0SUB2233:PRINTaL'193. J*<2H 

3133 NEXT 

31*8 PORR=HT01STEP-l:L=L*6*:GOSUB2223>PRINTaL-6*.STflING»(8.32H 

3141 O-64i0NEA.lGOSUB343a.341B 

3138 IFZ<!0RR)4,3179 

3163 Z=Z-UG0SUB2233 

3173 rJE*T:GOSU82223 

3183 IFBA-l,F0RR=lTO2:U=2iGOSU82223:O-6*i60SUB3*lBlv-31GOSUB222a 

10— 6*iG0SUB3413:NEXTELSEI» = TfAfJQue D'ELAN" :G0TO398B 

3193 FORR"lT011iPRINTaF,- ■ 1 iF=F-64*BjPRIMT3F,STR1NG»(3, 191)11 

IFV/3,V=V-HG0SUB2223ELSEFCiRTP-lT02fliNEXT 

3193 NEXTIPR1NT3F.- "1 

3 288 G0TO39BB 

338B IFP!-64*INT(Pl/6*>>6.D-ABSIP3-64»INT(P3/6*)-Pl*6*»lNT<Pl/6* 

I )ELSE0>12>GOTO331B 

3313 IF01I4,T*--ANGLE TROP PET I T • I G0T039BB 

332B IFD>24,T*-*ANGLE TROP GRAND - >G0T039B0 

333B H-D/2-HG0T031BB 

340B IFPEEK(13432*L)-32,RETURNELSEBA-1 

3*1B PHINT3F," *|IF-F*0!PRINT3F,STRING*I3, 19t)| 

3428 RETURN 

349B PRINT313,CKR*11B3)1STRING*(33.I79J|CMR»(187)1 

3*99 •••.••....••*.•••••. 

• CHOIX ANGLE TIR • 

33B3 PE-PEEKU443B>HFPE-0,35a3 

33 IB IFPE-32AN0A>B. A-A-l 1GOT0334B 

3320 1FPE-6*AHOA<7B.A-A-1IGOT033*0 

333B 1FPE-80RPE-1 . A-A».31743 1PRINT31 3, STRING* 1 37. 32) I : RE TURN 

334B PRINTai*.STRING»(A/2,19! i:iIFA<70,PRINTCHR*(179)l 

333B 6OTO3300 

38BB NP-NP*li3C»5C'ieona»K'DiBA-BiF0RH-aTO*IPRINT8P3*6*'K,STRIN 

G*(27.32) t 1 NEXT 1G0TO1 233 

3999 ■..>>>■>*•>■••><>•>>••>•• 

• COMMENTAIRES FIN JEU • 

398B CLSlPPINraB96, STRING* (63, 131! 1 

3913 DP>6*B>AR-672>GOSUP2B30iU*l tGOSUB2B2B:GOSUB203B 

392B Ol-*02iD2-33BiGOSUB3Bfl31PRINTa*7B,-C*EST TERP1INE. * 1 1TI-3O1G 

O5UB9BB0 

393B 0t-4B2!D2-33B:60SUB3BBflilFNP<3.PRINTa468. 'C'ETAIT POURTANT 

FACILE ■ ■*1ELSEPRINT3*69. -F ELI CITATION' I 

3933 Tl>3atGOSUB9BB0 

3940 Ol-338iO2-34BiGCiSUB30eB!PflINT348ft.'VOUS AVE! REUSSI • I347B, N 

P 'LANCE* H IFNP-1, PRINT'S" 1 

3943 T1-BBIGOSUB9B0B1]FNP-O,397B 

3930 D1-339.D2-3631GOSUB3008!PR1NT3*07.'LE NUMERO'NP' I ' V0U5 A ET 

e PATAL--a*7*,-< -ir*r )• nri-90iGOSuB980fl 

3960 Dl"337H>2-3331GOS(JB3003iPRINTa*03, "VOTRE 5C0RE EST DE'13470 
.SC'POINTS, ' - :T1»901G 




397B 01-l*5-D2-3-«iGOSUB3BB«'P0:Nr3216.- FS "Efi 

les- isiea.-c-j jeu. AB*.vr>r*»«o ou* 183*9. •i^ct.ips «.■« nc^jelle "as 

'IE •■ -a4it.-(REP'---N-i5E It 2 CJ 3>"l 

3980 A»-INKE<l:IFt* ■: ■ SA» ■■ 3 ■ , J9«Ei,SE3»93 

3=B3 tFR.jD!3B>-3B,GOSVB2«4B-eOSU12«M'G('? 

3"3T GOT039BB 

3990 Tl=BtGOSUB9008IO*fVAL< A* »GOT09W9». *(*»•. *«1 B 

4333 Dl-*B*iD2-3*3iSOSUB30«0iPRINTa*7i.-S * . 

,r.v: J- j: :•:.:-;! , •- ■ 

4B10 Dl-*a3H>2-3*7iGOSUB3B00iPRINT9*7I.'C* V VA ■ - ; I T ) * 20 ' SC5W9 

.". -2 : :-:..- :>■".'-•-: i : ■ :■ " .- : .' 



• SOUS-ROUTINE PAROLES • 
) D3-D2-6*»INTlD2/64>-Dl-6*«; 



-- :■■ 



3313 PRINTa01.CHR»!lS8)15TRlN5*iD3. H8iiC-*li 1=5': : " 

INTBD1 •&*•«, CHR*( 191)iaDl*D3*l-64»H,CMR»ll91>iINEl r»l 

STR1NG*11B.131>-CHR*(]731-C«R*(14*I1CHR*( 167H5TR;M1 

iaDt.6**D*-t39,CHR*(138)lCHP*'I39>iCHR*( 132)1 

3820 RETURN 

7BB0 PRINTCKR*(2B)t 

9BBB F0RTP»lT0Tl-IFW-e,L-L(RND(2>) 

9013 IFRN0I*B)"4B,GOSUB2B*8 

9B2B IFRND(4B)-4B,GOSUB20S0 

9023 IFRNDllB)~ia.GOSUB213S 

9033 NE XT iF0RK'BT0D*-2: PRINT 3D! *6*-K. STRING* 'D3-2.;: 



BB2B Dl-46: 
RES SIMPLE, 
0338 D1-33B 
RARER' 13461 
VARIABLE. '1 
00*8 D1-*S» 
S O'UN TRE' 
BB3B 01-393 
EZ WE' 13323 
3360 01 



QUER 
23 
B07B 



-396 
L' ANGLE' 
B89B OK 
lOISI,' 13328. 

eiaa 01*330 

EN FONCTION 1 

si ON. 

01 IB 01-462 



teGLES Oy JEU > 

j-pRiNiaao.CHR) 



l)ISTRING*(2" 



10 PR]NTa960.STRING*C< 



.1311 



'DP- 726 



ANGLE* (3330, *DU TIR D€ VOTRE PROJECTILE 



02-633 I GOSUB3B00 1 
TOUCHES *5CHR*(93)i' ET 
613'G0SUB380a- 
26,CHR*(94) 1 ' POUR 



Bit ■ 



NT". 



1N6II41, 131 

1820 n-2'OP 
1033 N-liOP 
104O L-I 
I-30'GOSUB9a8B 
1330 01-268 

UELOUES' 

330 



B33 L-LII) 

86B Dl-262 

BATE'13392,'. 

1863 II 



UB2B30iPRINTaL(2)-3. 



1090 L-l 
REGLES' 18430 
RETURN 
T I -B ' G 



02-627 !GOSUB3003fPRINT3329 

t ' T 1 -*B 1GOSUB90O0 

02-0 23 1 GOSUBSaBB 1 PR I NT 3397 , 

•UNE CIBLE PLACEE AU OESSUS DE M6 ! ' t A3 30 . 

T1-90-GOSUB9BBB 
D2-63BiG0SUB33eaiPRINTa321 



D2-620 i GOSUB3O00 i 
'CATAPULTER JUSQU" 
02-626 I GOSUE3BC0 I 



.•TI-301G-: " 



IINT3461 

CETTE 
r I NT 8*6 



IINT3326 
;CMR*19 
HNT3462 



02-622 i GOSU83ee0 i PRINTS*** 
APPUYERZ SUR '[ " OU 'ENTE 
'2-623 'G0SU838«3'PRINTS397 

3*67. 'DE LA 0IFF1CULTE DU 



*0i :C«R*(lB©)iai*, 



l,STRINt»eSli 



■ ■ :■ '•- :■■:-, . .•.•;•= : r -, ; 
VOUS A1.LCI VOIR. C-EST 
VOUS DEVEI ■ 



HAUTEUR 
POUR CELA. JE ME SEW 



US C'EST VOUS 0U1 DCV 
.E." t IT1-7OG0SUB9B00 
. VOUS SUFF1RA DC M'lN 



-VOUS HE L'INDIQUCREZ GR 
) 1 1 T I -60 1 605UB93O3 
CHR«(93)|' POUR DININUEH 



OUANO VOTRE ANGLE EST 
' UTl-60'GOSUB9Oafl 
VOTRE SCORE EST CALCULE 
IR* 13333, 'ET DC SA PREC 

BONNE CHANCE.' I I T 1-2 



2B G0SUBlB3B01G05UB1833a 

>BIBA-a>TT-3'GOTOi2B0 
B3DB IFS>l.S-S-lIG0SUB2B3e 
83 IB IFT>1,T-T-1'G05UB2B3B1GOT01B3BO 
03 2 B RETURN 
B33B U-1IG0EUB232BIDP-AR*1'« 



r 1 AR/6* > -33 1 GO5UB2O00' RE TURN 



RESENTATION i 



13192, ST RING* (64, 131 
37BIAR-613IGOSUB20BB 

-396IG0SUB28BB 
-323 1 D2-470 1 G0SUB3B8B > F 



070 GOSUBia300iL-L(2 



IFT<3,T-T*HGOSUB2B30'GOTO1IO33 
D2-4e6IGO5UB300B>PRlNT332fl.'JE VOUS PRESENTE L'ACRO 
UI VOUS AIDERA DURANT LE JEU. • I i 'T1-7B'G05UB9B80 
GOSUB2B30iL-L(2)iGOS-JB2O33iGOTOlt063 



: U- 2 1 GOSUB 2B20 1 G0SUB2( 
^01-3*3iD2-49BiG0SUB3BOBiPRlNTa*12, 
■ i T 1 -0 1 GOSUB90B0 ) L-L < 2 1 ' U- 1 ■ G0SUP21 
1INEKTKK 



l-26aiD2-*7fl i GOSUFSCFiairHiN 



■VOULEZ-VOUS LES 



(2)iGOSUBlB30O'Atl'613>GOSUPlO3 



"■/- 



Vt_ 



ULYSSE 



Vous etes Ulysse, un peu perdu dans un lointain Futur 
et vous aimeriez connaitre le chemin de la Terre. 
Cache dans un labyrinthe, le minotaure est gardien du 
secret. Vous avez I'habitude des minotaures, vous 
savez ce qu'il vous reste a faire... 

Willy CABOURG 

Mode d'emploi: 

Un detecteuf vous indique la distance qui vous separe du mino- 
taure, ce derruer decouvert, une inversion de ce meme detecteur 
vous aidera a retourner a voire point de depart. 
Faites DEFM 2 et repondez 1 ou 2 a la question Difficult^, apparais- 
sent alors 3 signes suivis d'un nombre qui repfesente I'tndicalion du 
d6tecteur. 
1er signe: 

>lmpo»8lbi!ft6 de tourner a gauche ou 
\? Possibility de tourner a gauche. 
2eme slgne: 

X impossibihte d'ailer tout droit ou 
O possibility d'ailer tout droit. 
3eme slgne: 

< impossibility de tourner a droile ou 
-- possibilite de tourner a droile. 

Exemple: > O < vous pouvez aller tout droit ou faire demi-tour, 
Deplacement a I aide des touches numefiques 2, 4, 6, 8. 
Le mtnotaure decouvert, le message RETOUR apparait el la dis- 
tance est inversee 




LIST ALL 

■■ '-'■:. us' 

fflRi (6 PS&: 1526 

pis iee; sief; 

1 L=8!H=8:6=!!j'=3 
ilKF 'jIFFICUlT 

se \n ",0!iF ( 

8-l)t(J-2)»6 FH 
EH ! 

2 6S8 18»!8*S!!=3 
:;;=;iii (V*rrhi: 
Y=1HT (l»V»lifilll 
IKIJDE 5SSOT0 ( 



:=!!(! <2*FSfiC ', 
R(1«(1*C0S . 
/2»/2>/2K2tJt 
1+SIH (l«H/2»! 

P.EI 

4 H=Ss6SB 3:S=i;- 

=i'|!SSB 3:B=C: 

K=s-;:ta ; 

5 HiSJJ C(X i''> 
(Y-J»2) 

6PRT CSR 8i°i"l! 

',? 6--!;?SI CSR 

81" •; 
? PR! CSR SiTii 

IF RsllPRl KP 

3lT! 



8 P8! CSR !3!"i"! 
Hf C=l;PSi CSR 

I8i"(": 

9 if H=e; if wip 

P.T :PRI "C EST 
SflSRE EIHHl" I 
OUPS":EHB 
18 PRT CSS I4!lt.i 
liHiHF M\M 
!V=8:?F.T CSR 8! 
"RETOUR"! :L*l:6 
010 4 

11 NODE 4!E*=KEV:I 
F El=™ THEN 11 

12 WOE 5i IF Et=*8 
»|IF R=0!HEH 2 



13 IF E»»"6"iIF t> 

3lS=S*3:S0;0 23 

14 IF E«="2"IIFB) 
8!6=6*2!60T0 23 

15 IF EJ="4" :• B- 
9; f i=6M:GC!C 20 

16 3010 11 

28 IIWliMtFMC 
(6/4!l=ItC0S (5 

•;-2!j=j';:n (6 

««/2 
22 IF L»itJ=£i;PRT 
:PRT "KISSIOH H 
ON RCCOhfLiE'iE 

110 



; : I 



5010 4 

fl6=275B7S2-.8T=2 
536874 1 H8»27S85 

t2:S?=233l074:B 
3=1393133 

=3538877:81=2 
5337191(12=29259 
94:83=2435!::: 3 
4=3458134 

92 «5=2991442:V=18 
:P.E7 

138 88=57383625345: 
81=50852815275: 
fl2=432SK::S?i: 
83=53572135334 

181 S4=37SS82S397S: 



85=353450^2?;?: 
86=58131333342: 
87=35616331463 

182 83=58360233766: 
89=44336557466: 
88=43639223882: 
31=4794543353; 

163 82=458115865141 
83=48981846713: 
84=4916362^7;: 
85=61331532371 

184 B6=33583275838: 
B7=229B6492244: 
V=17:8ET • 



HYPER SCREEN 



APPLE 



De beaux menus, de belles presentations, tout ceci est 
possible avec ce programme qui vous permet d'editer 
une page texte. de la compacter et de la sauvegarder 
sur disquette. C'est ca. IHyper ecran (NDTA: D'ou le 
name). 

Y. BOUVIER 
Mode d emploi; 
Taper le programme Basic el le sauvegarder sous le nom Hyper 



Screen Taper ensuile le lislmg 1 de la facon suivante 

CALL 151 < RETURN ^ 

1000: 20 F5 E6 86 18 20 F5 E6 < RETURN - 

4008:86 19 20 F5 E6 86 etc ... 

Lorsque vous avez flnl, lapez BSAVE HYPER OBJ. AS -1000. LS 

282 puis le lisling 2 de la meme lacon mats en commencanl par 

Tapez enfin BSAVE DEPACTEUR.ORI.AS 300. LS 7D 
Lancez le programme par RUN Hyper Screen. Le programme exam- 
ple vous montre une ulllisalion d'Hyper Screen. 



WES BOUVIER 

N 



si Ren 70 sue boileau 67oo& tvo 

[« IK! : HOME :BACK - 164^:,-,L 
LER = 1642I:BRUIT - 16384:CH 

- 1:CV = 1 

110 PRINT CHRS 14) : 'BLOAD HYPER 

.0BJ.AS4O0O- 
113 PRINT CHRS <4)i "BLOAD DEPAC 

TEUR.0R1.AS300" 
117 POKE 10.74.1 POKE 11.0: POKE 

12.03 

120 call bruit, 32.3. :• 

iso goto 4ooo0 

990 vtab cv: htab ch:me - o: mode 

- 64:D - 33 * 129: SQSU8 20 
SOO 

IOOO VTAB CV: HTAB CHl POKE t PEEK 

(40) ♦ PEEK 1361 ♦ PEEK (4 

1> • 256). D 
IOIO GOSUB lOOOO 
1020 IF A - 8 THEN 1 IOOO 
1030 IF A - 21 THEN 12000 
1040 IF A - 11 THEN 13000 
1050 IF A - 10 THEN 14000 
1060 IF A - 27 THEN GOSUB 20000 

: GOTO 40000 
1070 IF A - 7 THEN MODE - - 64: 

- 33: GOTO IOOO 
10BO IF A - 6 THEN MODE - OiO - 

33 * 64: GOTO IOOO 
1090 IF A - 14 THEN MODE - 64;D = 

33 * 128: GOTO IOOO 
110O IF A » 3 THEN GOTO 21000 
1110 IF A - 1 THEN 22O0O 
1140 IF A > 96 THEN A - A ♦ 64: IF 

MODE < > 64 THEN CALL BRUI 

T, 32,3.3: GOTO 1000 

1145 IF A < 64 THEN A - A * 64 
1149 REM 



16 .4.. at LEFT* IA», LEN (AS) - 

IllOft = OR - 1: HTA8 DRi VTAB 
VERi PRINT •- ", CALL BRUIT, 
10.3.31 GOTO 16003 

16030 HTAB OR: VTAB VERi PRINT CHR» 
(128 * All" "IAS - AS . CHRs 
(A * 12B> :0R - DR • 1: GOTO 

16009 

16999 REM 



"LOAD* 



HARGER: 



HOME i VTAB 10: HTAB 
-NOM DE LA PAGE A C 
PRINT : HTAB 10: PRINT 



17010 GOSUB 16000 

17020 IF A* - ■■ THEN 17010 

1703O PRINT CHRS (131 * CHRS [ 

4>I"BLOAD -iA*i",A»400": GOTO 

990 
1 7999 REM 



- SAUVERS 

18000 A* - ■": HOME I VTAB 10s HTAB 
5: PRINT "NOM DE LA PAGE A S 
AUVER:*: PRINT : HTAB 10: PRINT 

180 10 GOSUB I60OO 

18020 IF AS • "" THEN 18010 

1B023 .CALL BACK 

IB030 PRINT CHRS (13) * CHRS ( 

4>S-8SAVE M ;ASS",AS400,LS3FF 

": GOTO 400OO 
19999 REM 



2000O VTAB CV: HTAB CHi POKE i PEEK 

(40) * PEEK (361 * PEEK (4 
1) » 236) .C: RETURN 

20SOO VTAB CV: HTAB CH:C - PEEK 

( PEEK (40) + PEEK (36) ♦ PEEK 

(41) • 256J : RETURN 
20999 REM 



*PRINT§ 

1130 IF CH - 40 AND CV = 24 THEN 
POKE 2039, A * MODE: GOSUB 2 
0500: GOTO IOOO 

1160 VTAB CV: HTAB CH 

1165 POKE ( PEEK (40) * PEEK !3 
6) * PEEK [411 • 256), A » M 
ODE:CH - CH * 1: GOSUB 20500 



•EFFACER* 

21000 VTAB CV: HTA8 CH:J » PEEK 
(40) * PEEK (41) • 256:C - 
PEEK (J + CH) 

21010 FOR I » PEEK (36) TO 3B: PI 
I * J. PEEK (I * J * 1): NEXT 

21020 POKE J -* 39.160: CALL BRUI 

T. 40, 2,1: GOTO 1000 
2 I 999 REM 



1170 CALL BRUIT, 10.1.5: 
41 THEN CH = 1 :CV = 
II BO GOTO IOOO 
9999 REM 



IF CH : 



• GET S 

10000 IF ME THEN CALL 164S9i GOTO 

1 0020 
I0010 WAIT - 16384. I2B 
10020 A - PEEK ( - 163B4) - 128: 

POKE - 16368,0 
10030 IF ME AND A = 27 THEN HOME 

: POP : GOTO 4O0OS 
10040 RETURN 
1 0777 REM 



22799 REM 
-PACT AGES 



PEEK <Zt>! SIS 
I, PEEK (I . 

:all bruit, 40 



■ GAUCHE s 
11000 IF CH 



I THEN CALL BRUIT 
,32,3.5: GOTO IOOO 

GOSUB 20000: CH - CH - 1: GDI 
20500: G05UB ISOOOi GOTG 100 



; 1 999 REl 



Z30O0 COLL BACK; CALL 16774 
23010 HOME : VTAB 10: HTAB 4: PRINT 
"ANC1ENNE OCCUPATION :t02fl 
CTETS": PRINT : HTAB 4: PRINT 
"MAINTENANT I"||0C ■= PES ! 
JOJ - PEEK '3D » 256 - <3 • 
16 31: PRINT OCl" OCTETS ' 

• •'-. PRINT 
■ HTAB Si ■ KIT 1 • 1 . INT 
IOC / 236C" SECTEURS": PRINT 
23030 GOSUB lOOOOl HOME i GOTO 4 

0009 

23-V99 REM 



■WRITES 



12O00 IF CH = 40 THEN CALL BRUI 

r. 32.3.5: GOTO IOOO 
12010 GQSUB 2OO0O(CN ■ CM * 1: GQ3U6 
.jfO 100 

o 

1 2979 REM 
•HAUTI 



■.'I riiF_n Li'., i 
. . ■ . : 
13010 BOG I : GOSUB 

i lOOOl OOTO 100 
O 
I 3999 REr 



24000 HDME : VTAB 10: HTAB 5i PRINT 
-NOM DE LA PAGE PACTEE A SAU 
VER :": PRINT 

24010 HTAB 10: PRINT "/PACT."! 

24020 GOSUB 16000 

24O30 IF AS - "" THEN 24O20 

24040 PRINT CHRS (13) * CHRS ( 
4) I •BSAVE PACT. ":ASI ".AS3000 
,L"l PEEK (30) * PEEK (31) • 
236 - 5 • 16 ' 3 * 1: HOME I 
GOTO 40005 

24997 REM 



•PENTRER* 



•MX BRUI 

t. ;r, [, '.: 

IB ■.< ..' .'■_..: 

■ i a 



•BRUITS 

I3O00 CALL BRUI r. 10. 3.5: RETURN 

13777 REM 

■INPUT* 



HOME : VTAB 10; HTAB 3: PRINT 
•NOM DE LA PAGE PACTEE A REN 
rRER :": PRINT : HTAB 10: PRINT 

•>PACT."I 

29010 GOSUB 16000 
29020 H 7 At ■"■ THEN 25010 
23030 PRINT CHRS (13) * ■ CHRS ( 
4):"BLOAD PACT."tASI",AS5000 

23035 HOME iV = USR (204BO) I GOTO 

990 
23999 REM 

- BSAVE 4. 



16000 A* ■ "-:VGR ■ PEEK (37) ► 
UDR - PEEK (3A> * J sDJ » D 
P: VTAB VER: HTAB DRs PRINT 

16009 GOSUB 100O0 

16010 IF A » 135 THEN AS = "I CAI 
BRUIT. 32, 3, 3: GOTO 40120 

16013 IF A = 13 THEN RETURN 
16020 IF A ' > 8 THEN 1603O 
16023 IF AS - "■ THEN VTAB VER: 
HTAB DR: PRINT "' ": CALL B 

RUIT,32.3,3i goto 16O09 
16030 ir LEN (A*l - 1 THEN DR - 
Dli VTAB VER: HTAB DR: PRINT 
:r,t . "■■: CALL BRUIT, 10. 

J, 13i goto 16009 



VEMENTS DU CURSEURS I 



otc 



PRINT 
30020 HTAB 10: PRINT "ESC POUR L 

E MENU": PRINT 
30030 HTAB 5: PRINT "CTRL A:AJOU 

TER UN CARACTERE": PRINT 
30040 HTAB 5: PRINT "CTRL ElEFFA 

CER UN CARACTERE 1 ': PRINT 
30050 HTAB 3: PRINT "CTRL N:MODE 




NORMAL 



CURSEUR: I 



PRINT 



3OO60 HTAB 3: PRINT "CTRL I : MODE 

INVERSE CURSEUR:":: INVERSE 
: PRINT "»": NORMAL I PRINT 

30070 HTAB 5: PRINT "CTRL F:MODE 
FLASHING CURSEURi"!: FLASH 
: PRINT "■": NORMAL J PRINT 

300BO ME = O: GOSUB 1OO0O: HOME : 

ME - I: 60T0 40005 
39979 REM 



08B- B-J 24 B9 09 41 

090- Ce CO 3E DO Fl 

>98- C9 CO 90 06 38 

ZB £9 BO 

17 20 22 

B9 09 41 

24 C6 24 

16 86 25 

22 PC 69 

C8 CA CO 



40AS 
40BO' 
40BB 
40C0 



C8 CO 28 
23 A7 27 
20 ED FD 
B7 07 41 
E9 CO 4C 
B£> F7 07 
FC A2 26 
20 ED PD 



CO . 



DO 



40D0' 
40DB 
40EO- 
40E8 



• 09 ' 



01 B9 09 ■ 



A9 OO 83 

09 41 20 

?C DO ED 

85 1C AO 



40000 CALL ALLER: HDME :M£ - 1 
40005 VTAB 3: HTAB 3: INVERSE : Pf 

■E"li NORMAL : PRINT "DITION 
PAGE ECRAN": PRINT 
4O010 HTAB 5: INVERSE : PRINT "L 

"f; NORMAL : PRINT "ISTE DES 

CODES UTILISES": PRINT 
40020 HTAB 5: INVERSE : PRINT "H 

"i: NORMAL : PRINT "OME 1EFF 

ACE L'ECRANl": PRINT 
40030 HTAB 5: INVERSE : PRINT "C 

":: NORMAL : PRINT "HARGER U 

NE PAGE ECRAN": PRINT 
40O4O HTAB 5: INVERSE : PRINT "S 

"i: NORMAL : PRINT "AUVER UN 

E PAGE ECRAN": PRINT 
400SO HTAB 5: INVERSE : PRINT -p 

":: NORMAL : PRINT "ACTAGE 

E LA PAGE ECRAN": PRINT 
40060 HTAB 5: INVERSE : PRINT "W 

"i: NORMAL : PRINT 'RITE PAG 

E PACTEE": PRINT 
40070 HTAB 5: INVERSE : PRINT "R 

"Si NORMAL : PRINT "ENTRER U 

NE PAGE PACTEE": PRINT 
40080 HTAB 5: INVERSE : PRINT "B 
'!; NORMAL : PRINT 'SAVE DEP 

ACTEuR SUR DISOUETTE": PRINT 
40100 PRINT TAB< IO)l"CHOIX t"i 

GOSUB 100O0 
40110 IF A = ASC ("C") THEN 170 



28- AO D3 C3 I 



) DO FS AS 
'41 AD OO 

> 20 84 FE 

> 60 AD 30 

> D6 C9 D3 
. C7 C3 D2 
I C5 CE D4 
! AO C8 D7 



1C I 



7C 



-: l -, 



CO C9 BO 

A9 OO BD 

CO 4C 6C 

AO C2 CF 

AO DO D2 

C5 AO BE 

DO C5 D2 

C5 CE AO 

I CE AO D3 



A4 24 
FO OC 
20 7B 
42 A5 
OO AS 
91 OS 

41F0- OO A9 FF 71 

41FB- A5 1C 91 08 

42O0- 02 A4 24 B: 

4208- 

4210- 

4220- 

4228- 

4230- 

4238- 

4240- 

4248- 

42SO- 

4238- 

4260- 

4268- 07 A7 OO B5 

4270- 

4278 

4280 



42 A3 23 



I 42 A3 ID 

E6 24 A3 

I A7 OO 85 

i 20 CI F6 

08 CB 71 



22 FC A5 ( 
85 IF 60 £6 



OO 71 Ofl 4C 

Bl 28 05 ID 

AO OO A3 1C 

42 4C AA 41 

23 C7 IB DO 
1C 9] 08 CB 
4C 33 42 AO 
OB 20 78 42 
20 7B 42 A2 
28 85 ID 
C9 18 DO 07 
71 08 4C 53 
A9 FF 71 08 
ID 85 1C 4C 
BA 71 08 20 
83 1C 4C C2 

24 C9 28 DO 

24 E6 23 A3 
60 C8 A9 FF 
OB IB 98 63 
00 63 07 83 

25 B5 24 20 
83 IE A3 07 
08 DO 02 E6 



0- C7 D2 



60- CC C7 I 



78- CS AO 



4IB0- 20 41 



BC AO 05 I 

CS D2 AO DO D2 CF 

CI CD CD I 

C7 AO D6 I 

C5 D2 CD I 

AO C4 A7 1 



! C3 D2 
C7 C3 03 
C3 D2 CI 
D6 CF D4 
DO CC C5 
83 24 20 
08 A7 50 
OO 99 00 
OO 52 99 
A4 24 Bl 
42 A5 25 



' D3 t 



C7 



AO CI 05 

DB AO CC 

CE AO C4 

D2 C5 AO 

AO A7 00 

22 FC A9 

B5 07 AO 

30 99 OO 

00 53 ce 

28 83 1C 

C9 18 DO 



j Listing 2 

0300- 20 58 FC 

0308- CI FB A3 

031O- 20 32 £7 

0318- 31 83 06 



Q336 91 D9 09 

034O- A7 00 83 

034B- FC 60 20 

0350- 76 03 AA 

0353- 2B 20 62 

0360- 21 03 E6 

0368- DO OB A9 

0370- A5 25 20 

0378 ■ OO 02 E6 



A9 OO 85 24 20 

30 4B A3 31 4B 

A5 50 85 03 A3 

68 85 51 68 83 

Bl 03 20 76 03 

OA. A4 24 71 28 

4C 21 03 AO 00 

07 C7 FF DO OA 

24 B3 23 20 22 

76 03 81 03 20 

A3 07 A4 24 91 

03 CA DO rK AZ 

24 A3 24 C7 28 

OO 83 24 E6 23 

CI FB 60 E6 03 

06 60 08 • 




40120 IF A = ASC 



40130 



00 



THEN ISO 
THEN CALL 



A - ASC C 
GOTO 990 

40140 IF A = ASC ("H". THEN HOME 

: GOTO 770 

40130 IF A - ASC ("L") THEN 3o0 

00 

40160 IF A - ASC ("P"> THEN 230 

OO 

40170 IF A ■ ASC ("W") THEN 240 

00 

40180 IF A " ASC ("R") THEN 250 

40190 IF A - ASC CB") THEN 260 

40500 GOTO 40005 

O REM 

• V .'i :, BOUVIER • 

• HYPER SCREEN • 

At n E *" • 

PROGRAMME EXEMPLE 



1 REM FAITES 2 PAGES ECRAN AVEC 
HYPER SCREEN PACTEft LES ET 
SAUVER LES 

2 R8>1 'taUC! LE NOM DE PACT.PAGEI 

ET PACT,F'AGE2 

3 REM GET EXEHPLE ILLUBTRE LA F 

ACON DE SE SERVIR DU DEPACTt 
UR 
10 HIMEM; 16384 
20 ADR «■ 16385 
30 OS « CHR* (4) 
30 PRINT DS! "BLOAD DEPAC T EUR. AS '; 

00 ■■ 

60 POKE 10.76: POJU 11, Oi POKI I 

2.03 
100 PRINT &*I ■'BLOAD PACT.PAGEI. A 

" : ADR 

i.DRjADR - ADR * PEEK (4 
-;M(,> * PEEK (43617) • 236 

120 REM 4 1616 ET 4361/ I LONGUEU 
R LE LA PAGE CHARfiEB 

200 PRINT D«i"RLOAD PACT.PAGE2.A 
" I ADR 

210 P2 - ADR 

970 HOME 

IOOO V ■* USR (PI) 

16304.123: POKE - 



26000 HOME :M - O: VTAB lOi HTAB 
3: PRINT "INSERER LA UIHOUET 
TE POUR": PRINT I HTAB 2i PRINT 
"SAUVER LE DEPACTEUR <PREBSE 
R REtURN' :": GOSUB 10000 

26010 IF A < > 13 THEN 26O00 

26020 pRINT CHRS (131 * CHRS ( 
4 H "BSAVE DEPACTEUR, AS300. LI 
2ft" 

26025 HOME 

26030 GOTO 40003 

29979 REM 



30000 HOME : INVERSE : PRINT "LI 

STE DES CODES UTILISES : " : NORMAL 
30010 VTAB 4: HTAB 3: PRINT "'MOU 



1020 Y 



,8.0 

USR (P2) 



16.JB4. I2Bi POKE 



I'llO ' 'i r i j l"'-, 



Listing 1 



4000 ■- E6 .''• IS 20 i '• < 

., .-I, : '. 1 . ■ 1 9 i '■ H', U. - 

■i IJO tfi M i -' DA I 

.;. :.; [0 i IB DO i b CA DO i 

■ 6 IP ■ I ■ ' ■ I ■ 

... 9 07 A 

b I Ofl 

Ft" £6 07 C6 < 
. ,. , ■ . 

../ 



TI99 BASIC SIMPLE 



Suite de la page 21 



5220 GOSUB 4970 

3230 PRINT I tl II ■ M II 111 II tl II 1 1 1 lllf t 

5240 PRINT "SOYEZ ATTENTIF A L'EXEMPLE 
SUIVANT": : "TI 97 A LES CASES VERTES" 



5260 PRINT "LES BLEUS SEMBLENT GAGNER 

ERREUR ■ '": : 

S270 PRINT "L' IMPORTANT A CE JEU EST DE 

PROVQOUER L'EXPLOSION AU MOMENT OPPOR 

TUN" : i 

32B0 PRINT "REGARDEZ BIEN COMMENT 

S-EFFECTUE LA CONOUETE DES CASES AD 

VERSES": : 

5290 FOR 1-1 TO 2000 

3300 NEXT I 

5310 CALL CLEAR 

5320 PRINT - CHOISISSEZ VOTRE DIMENSION" 

5330 PRINT " POUR DEBUTER PREFEREZ LES 
PETITES TAILLES'liIKl 

5340 PRINT "TAILLE ---> 3"::" «-> 
1":: " ■— > 3"::" — > 6":l: 





CALL HCHAR 


23.4,32 




', [60 


MAX-4 






3370 


RETURN 






g ieo 


PX-1 






5370 


PY-I 






3400 


RESTORE 34 







5410 


DATA 0.0.0 


1.2,2,3 


1,0.3,3 











9420 


FOR 1-1 TO 


4 




5430 


FOR J-I TO 


4 




3440 


READ FF 






',■!',.. 


AAII.J)-2 






3460 


AU.J1-FF 






3470 


CALL HCHAR(LL*LLV» 


,CC<MMV 


»48) 








94B0 


MMV-MMV'3 
NEXT J 






■/,'iO 


LLV-LLV»3 








MMV»0 






V,.Ci 


NEXT I 






'.-,.'.'. 


AA ( 1 . 1 ) - 1 




, A 


SS40 


RETURN 






■//," 


PX-1 






■,:,/. ', 


PY"I 






3570 


RETURN 






VINO 


PX-2 






V.7.1 


PY-2 






'.,(><><> 


RETURN 




1 *> 


3610 


FOR I-I TO 


'' Y 


3620 


FOR J-l TO 


6 




-j. ;,; 


All. J 1-0 




fe2' 


3640 


AA(I.J)-0 


„v, 


-.'.-, 'j 


NEXT J 






',.',',n 


NEXT I 






S670 


CXPLO-0 






-,',.i-i 


CONT-0 
RETURN 







23 



LE LOGICIEL DE LA 
SEMAINE 



LODE RUNNER CHAMPIONSHIP 
de BRODERBUND pour APPLE, 
COMMODORE et ATARI 




Comme vous avez pu vous en 
rendre compte par vous-meme 
la semaine derniere. il nest 

plus besom de s'occuper des 
deux nains: la discorde regne 
entre eux de la maniere la plus 
evidente et la plus efficace qui 
soil. Rien de bien compltque 
en fai; pour obtenir ce resultat 
quasi-miracuieux apres tant de 
semaines d'echecs repetes. 
Plus de probleme, pas de pa- 
nique: ils se sont separes sur 
une derniere invective, sur un 
ultime echange verbal et inju- 
rleux. Et tout cela grace au ca- 
deau empoisonne que nous 
leur avons fait (telle la pomme 
a Blanche Neige): nous leur 
avons tendu UN exemplaire de 
Lode Runner Championship. 
Ouf • 

Vous vous souvenez peut-etre 
avoir entendu parler d'un 
curieux petit bonhomme en 
quete perpetuelle de caisses 
et autres caisses. Son surnom 
(qui lui venait de Dieu sait ou) 
sonnait de maniere bien 
agreabie a I'oreille tout comme 
les syl'abes roulaient libre- 
ment dans la bouche de celui 
qui le prononcait: "LODE RUN- 
NER". Aujourd'hui. notre heros 
au sourire si rare (et tout ce 
qui est rare nous est cher, 
merci Sophos) repart a la 
conquete de nouvelles caisses 
dans des labyrinthes 6 
combien complexes. 

Mais conlrairerrjen! au premier 
niveau de ce logiciel (si je puis 
m'axprimer ainsi)1es differents 
tableaux de la nouvelle ver- 
sion ne sont pas accessibles 



par un editeur de tableaux. 
Vous devez imperativement 
vaincre les obstacles du pre- 
mier pour contempler de vos 
yeux embues de bonheur le 
deuxieme niveau. Et ainsi en 
ira-t-il pour les cinquante ta- 
bleaux qui vous sont proposes 
cette fois-ci. Prenez garde ! 
Tout nest pas si noir dans 
cette version machiavelique: 
vous avez la possibilite d'ef- 
fectuer des sauvegardes (une 
dizaine) de la partie. Ainsi des 
que vous avez franchi un ni- 



veau, vous sauvegardez voire 
oeuvre, reprenant de cette 
facon la lutte la ou vous aviez 
reussi. vous attaquant griffes 
dehors et la rage dedans a 
1'innefable. Grande nouveaute 
incluse dans ce "Champion- 
ship", chaque tableau arbore 
glorieusement un litre. De plus 
a chaque fin de tableau, un 
petit commentaire humoristi- 
que vient vous encourager 
dans voire quele. 

Jack LODE et Jim RUNNER 




LES /VENTURES CHAOTIQUES 
DE MICHE ET MICHA 



SPELUNKERDE 

BRODERBUND 

POURCBM64 




- Bon. tres vite parce qu'on a 
pas que ca a foutre. le ga- 
gnant du concours Miche et 
Micha: il s'agite de J06I 
Huaulde. qui a done gagne un 
abonnement de six mois. 

- Je ne me sens plus a I'an- 
nonce de I'annonce qui pre- 
cede, sans evoquer celle qui 
suit, b:en qu'elle me precede. 
A ton avis ils suivent ? 

- Oui. ben ils n'ont qu'a cher- 
cher. 

- Tiens j'ai remarque que plus 

Sersonne ne nous insultait. les 
onnes habitudes se perdent. 

- Alors. on cause de Broder- 
bund ? Parce que Cathy, la 
soeur du patron de Broder- 
bund, aouaouahhhhhhh... 

- Bof ! Elle est grosse, et puis 
e'est pas sa soeur, e'est sa 
nana alors laisse tomber. 

- Ca veut dire Brotherhood. 
e'est un jeu de mot. 

- Je te suis pas bien. fallait 
pas me doubler. 

- Comment ga. j'oriente tes 
reponses ? Tu te fous de 
moi ? T'as qua delirer, mon 
vieux ! 

- Des lires, eh ? T'y es fou 
dans ta lete, e'est des dollars 
que j achate. 

- Pas moi. parce que j'aime 
pas 9a. Mais t'es pas oblige de 
suivre mes conseils. 

- Bon le bund e'est pas trop 
bon pour nous, vu que le 
temps d'antenne va etre rac- 
courci et que notre auto-pub 
va loirer si ca continue. 

• Je ne vois pas ce que vient 
(aire le cassoulet la-dedans 
T'as encore pris de rActifed. 
Tu sais que e'est mauvais 
pour tes aortes. 



- Pour ameliorer voire rentabi- 
lite. arretez tout et ecoutez- 
nous. 32 heures par iour sur 
MEMFM. 

- Tu vas etre oblige de cra- 
quer. Le cadavre exquis est-il 
ton fort ? 

- Ca depend du vent car e'est 
lui qui enchose le temps 
(merci SUPER FREEGO). 

- Oui. (tresdur) 

- Bon. (muy ardos) 

- Oui. 

- Bien. 

- Ca. e'esi du dialogue inte- 
ract ! Bravo la concertation \ 

- Des anchois etendus dans 
I'huile en ete el rouies dans la 
sauce pimentee en hiver, ga 
peul rapporter gros. T'as vu le 
dernier record a ce propos ? 

- Ca ressemble a un vague al- 
liage enlre un patchwork et les 
deiires actifediens. Bon. j'ai 
fait ma part, tu conclus ? 

- Certainement. La recette de 
cette semaine vous etait pro- 
posee par M. Iche et M. Icha. 
A la semaine derniere. 

- Pourquoi je donne pas la so- 
lution du concours ? 

- Parce que vous pouvez aller 
vous (aire foulre ... 

- Et comme ca on pourra pas- 
ser la meme chose pour le 
prochain concours et Joel il 
gagnera queude. 

- Bien fait pour sa gueule \ 
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A VOS CONSOLES Tl 99/4 

BASIC ETEIMDU DISPONIBLE 



f 



BASIC ETENDU 

Module comprenant un langagc de programmatlon 
renforcjm le Bask du IT 99/v. 40 commandes supple - 
rnemakes, acres au langage assembleur, (EntreeVsor- 
ties). Sous-txogrammes. stockage. sprites, traltement 
d'erreurs. Expression! logiques. LET multiple. Intro- 
ductions multiples. Acces a I'exterulon 32 K. 



LEXTENSION MEMOIRE 

exterleure ram 3Z K permel de charger et 
dei soui-pro9rammei en attembleurj. La memolre 
31 K en Indlspemable pour une bonne utllliatlon du 
baik etendu et du I090. 



INTERFACE PARALLELE 
CEMTRONIC 

permet (flmprtmer dei textes et des graphlques et de 
llrter vol programmei. Braocbemeni immertl.it de 
touted Irnprlmantes avee sortie paralieie. 



INTERFACE SERIE RS 232 

Bfanchement ImmedUrt a partlr du Tl 99/4 A sur les 
Imprlmantet a sortie type BItOTHEH EP +* et regale- 
ment sur MOOEM. 



NOUVEAU : 

contrWeur de dhqurrtei enfk*»ab«ei dans ta bolie 
pertpnerlque, oontpMSble avec les andennes unites 
de dbquMtei Texas, avm tvyavee U nowette unit* 
double race - double denslte (voir d dessousL 

3J10FTTC ; 



Unite de dlsqupttP IntrXjrr-e pour l.i boitr peflprn>r1. 
que. slim line 1 1/7 hauteur) double race double demi 
te, capadte 300 h avr< le nouveau r.ontrO*n;r dr dls 

Cette Millr petmet d'lntegrer il leeteurs dans le torn- 
fHrtlment dhque de la bolte perlpherlque. 
2JOOFTTC I 1 



ASSEMBLEUR EDITEUR 

permel a I ullllsaleur Or programmer ion Tl W/* A en 
langage asiembleur. 



Tl CALC Module 

Gesllon dp tablraun, rakuli. edition Juigu'a 6.000 
eiemrnti a partlr de la console de bate. 
34O.0O r [ I 



Mkro orrtlnateur n Vtl* A Pal 


I.IM.OOF 1 


Tl 99/4 Perttet 


t.«)0,0OF 


Tl 99/4 Secam 


T .600.00 F 


Mifcjneior.ttieltei Tenai Inilrumenti 


SM.OO F 


Magneto raMPttri compatlblr II Uirnay 




avet (ompleur 


370.00 F 


Imprlnvanle SelkOKtia GP 50 A 


1. 350,00 F 


Imprlmante Selkosch.t GP 500 


/. 500.00 F 


EPSON RXflO frkllorVI rat lion 


4.150,00 F 


Machine ft wrke HROIHtH CI' 44 .1 memo 




et Imprlmante 


7.650,00 F 


Iriirit.wc par allele oiierlrure pour Tl/99 


1.090,00 F 


Interf.Ke serk pOW iWOTItril six Tl/99 


1 .090,00 F 


Fxtr-ndi-rl balk Europe Manuel anglais 


750,00 r 


Extended basic Europe Manuel Irancali 


HOOF 


Wemokr rxtrnslcus W K r«terleurc 


1.340,00 r 



PROMOTION 



LOT N° 1 INDISPENSABLE 

lr Modulr BASIC CTCNDU manuel en francali 
K! BASIC I'AK «.)l Mf ME 

«/ TFCHIMIOUi: DLS PHOGIrAMMES OF JEUX N" t 
K/ recHNiour OCS PHCK.HAMMES DC JEUX N- 7 
Lensemble BSO.OO 



LOT N» 3 ETUDE DU LOGO 

lr Module BASIC ETtNDU m.tnuel en fr.mcall 
IXII.NSION MCMOIRF. 37 K EXT. 
Tl LOGO N" 2 

2.795,00 




^ 



GESTION PRIVEE Module 



GESTION DE RAPPORTS Module 

Ce module crr>e. edlte et Imprlme dei lettres ttaiy 
dardi et del comptes rendui 375,00 1 I 



GESTION DE FICHIER 

Module complement aire et Indlipensable au bon 
'onctlonnemcnt du module gesllon de rapport 

260,00 . 



CARTE P-Code 

permet (execution de progra 

systemeP i.nOO.OOF I 

UCSO Pascal Compiler 500,00 F I ! 

UCSD Pascal Linker $00,00 P II 

UCSD Pascal Editor 500.00 F I I 

3.300.00 F I I 



MANETTE DE JEUX 

.»vec Interface ipeclale Tl 99/4 

I avec Interface 195, OO 1 



BON DE COMMANDE 
T/VRIFS JANVIER 1985 

Norn ...... 

Adrew 

CatieFmiM 

I/Mt 

Ces prix mil MIBKA el fXvwX rtre/TKHflfffH Sam 

prr>jv«. 

nvduM c/ivpnrwr*.! (X>m li timte itritrn \uxK\en 

r.v\K ifwiuvi ma fi.m at port H <Te*pMOonmm- 

(omm.'rxlf pour lei ft»;«/rrs ' .ti»/ 

t A Kit, 1 1 ACAiCUI. 
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